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AVERTISSEMENT 



Tous ies exemples figurant dans cet ouvrage ont 6te testes avec la version alpha du 
compilateur croise Megamax sur Macintosh. 

Certains problemes peuvent apparattre lors d'une compilation dans un autre 
environnement de travail ; 

• Les structures de taille variable Cursor, AkrtTemplate et DialogTemplate, 
notamment, peuvent poser probleme. Pour les curseurs, on utilisera la declaration 
non structure (vue dans plusieurs exemples). Pour les alertes et les dialogues, on 
pourra utiliser 1'artifice suivant au moment de la declaration : 

#define maxDT 8 I* 8 items maximum V 

struct _Dialog Template { 
Rect BoundsRect ; 
int Visible ; 

long RetCon ; 
Pointer /tems[maxDT+ 1 ] ; 

}; 

#def ine DialogTemplate struct _DialogTem plate 

La constante maxDT est definie avant la declaration et donne le nombre maximal 
d'items de tous les dialogues de ['application. 

• Quand une structure contient un pointeur sur chaine de caracteres, nous avons 
tres souvent declare la chaine au milieu de ['initialisation de la structure, laissant le 
compilateur separer la chaine et remplacer par le pointeur. Certains environnements 
n'acceptent pas cette ecriture, d'autres generent un code faux ! On apphquera done 
plut6t l'ecriture de la page 125, ou la chaine est d'abord initialisee, puis un pointeur 
passe dans la structure. 



DISQUETTE 
D'ACCOMPAGNEMENT 



L'auteur verse dans )e domaine public tous les exemples (et non les sources des 
programmes) pr6sentds dans cet ouvrage. 

Dans cette disquette (librement copiable) figureront les conditions d'obtention des 
sources sur support magnetique, compilables soit dans 1'environnement APWC 
(disquette Apple IIGS), soit dans 1'environnement compilateur croise Megamax 
(disquette Macintosh). 

Vous pouvez vous les procurer en envoy ant une disquette et une enveloppe 
timbrie a votre nom et adresse : 

Monsieur J. P. Curcio 

11, avenue Albert-Camus 

77400 Lagny 



INTRODUCTION 



L'Apple IIGS est un Apple II : j] suffit d'essayer de compter les anciens 
programmes Apple II toumant sur la nouvelle machine pour s'en persuader. En 
consequence, tout ce qui a deja €t€ ecrit sur 1' Apple II (ou du mains une grande 
partie) reste valide, et peut continuer a etre lu et employe. 

Mais 1'Apple IIGS est plus qu'un simple Apple II. L'interface utilisateur Apple 
(desktop user interface), apparu avec le Lisa, extraordinaire machine disparue 
pr£matur£ment, sans doute morte d'etre nee trop tSt, glorifie par le Macintosh qui lui 
doit son phenomenal succes, plagie sans vergogne par Ses constructeurs concurrents 
qui en ont compris tout rinte^rfit commercial, y fait son apparition. 



L'interface utilisateur a deux facettes. La remarquabie facility qu'elle apporte a 
l'utilisateur final du fait mfime de son universality est due k un ensemble de regies 
auxquelles doit imperativement se plier le programmeur. Plus de facility pour 
l'utilisateur signifie en Foecurrence moins de liberty pour le dereloppeur. C'est a ce 
prix que la portee gene>ale de tels concepts est possible. 



Le programmeur doit changer ses habitudes. L'epoque ou 1'on remventait la roue a 
chaque nouvelle application est revolue. Maintenant, Apple met a notre disposition 
plusieurs centaines de sous-programmes qu'i) faut apprendre a utiliser, ou du moins 
dont il faut connaitre 1'existence au cas oil on aurait a les utiliser. Un programme 
consistera en une suite d'appels a ces sous-programmes, constituant ce que nous 
appellerons Toolbox ou boite a outils, entrecoup^s de sous-programmes propres a 
1 'application. 



Une fois l'apprentissage effectue' (c'est long pour certains, plus rapide pour 
d'autres, mais cela vaut vraiment la peine de ne pas abandonner en cours de route), le 
programmeur saura rapidement constituer un squelette d'applieation qu'il pourra 
utiliser « a toutes les sauces » : l'investissement sera devenu rentable. Une fois les 
bases acquises, il est beaucoup plus rapide de divelopper une application respectant 
('interface et utilisant sa boite a outils qu'un programme classique. L'apprentissage est 



18 i BOlTE A OUTILS DE L' APPLE IIGS 



sans doute plus rapide sur ['Apple IIGS que sur le Macintosh : la boite a outils du 
dernier-ne 3 en etfet profite de ^experience de celles de ses aines, et certaines faeilit^s 
qui n'existaient pas sont apparues sur la nouvelle machine. En premiere approche, le 
programmeur pourra presque ignorer le fonctionnement de certains gestionn aires, 
grlce a la creation de la procedure Task Master, qui rend subitement toute simple la 
programmation de la boucle d'everienients. L'importance de cette procedure est telle, 
que nous lui eonsacrerons tout un chapitre, a la fin de I'etude des gestionnaires, avec 
un exemple complet d'application. Grace a TaskMaster et quelques autres routines a 
connaitre, on en vient rapidement k eonsacrer ses efforts de programmation sur les 
earacteristiques de son application, et non plus sur son environ nement d "utilisation. 

La Toolbox de I'Apple IIGS ressemble fortement a celle du Macintosh, avec deux 
differences notables : I'Apple II possede un affichage couleur alors que le Macintosh 
(des premieres generations avant les ROM 256Ko) est noir et blanc en standard, le 
Macintosh possede une notion de « ressources » (glrees par le resource manager) que 
I'Apple IIGS ignore completement. Les programmes ecrits pour Tune ou I'autre des 
deux machines devront tenir compte (entre autres choses) de ces deux differences 
fondamentales. 

Remarque La gestion de la couleur est totalement differente sur le GS et sur les 
nouveaux Macintoshs. On constatera rapidement que le choix du langage de 
programmation utilise^ est beaucoup moins crucial qu'avant. Pour programmer en 
Apple IIGS comme pour programmer en Macintosh, on a besoin d'un environnement 
de programmation permettant I'appel aise de ces programmes constituant la boite a 
outils. Bien entendu, un assembleur restera plus rapide qu'un C )ui-m£me plus rapide 
qu'un Pascal et plus rapide qu'un Basic. Mais I 'important, c'est la possibility d'appeler 
- et d'appeler efficacement - les programmes de la Toolbox. Le critere principal de 
choix sera done I'environnement, et a environnement £gal, la rapidity ou les gouts 
personnels. 

Au moment oil nous ecrivons ces lignes, aucun environnement de programmation 
defimtif nest disponible. Celui d'Apple (appele' programmer's workshop) est en cours 
de developpement (il inclura un assembleur, un C signe Megamax, un Pascal signe" 
TML et differents autres langages, y compris des langages orientes objet) ; de meme, 
I'environnement proprement C de Megamax. Les examples que nous don irons ont etc 
ecrits sur Macintosh, compiles et linkes sur Macintosh grace a un compilateur croise, 
toujours signe' Megamax. Gageons que comme sur Macintosh un grand choix 
d'environnements sera possible dans un avenir proche, et que tous respecteront les 
formats fixes par Apple en ce qui concerne les codes objet s (resultant d'une 
compilation), ce qui permettra de linker ensemble des modules provenant de 
differents environnements et de differents langages pour obtenir une application 
Apple IIGS qui tourne encore ! 

Le present ouvrage se veut une introduction aux concepts de la programmation 
d' applications tournant sur Apple IIGS, conformes a interface utilisateur Apple. La 
plupart des programmes lies a cet interface sont £voques, certains plus longuement 
que d'autres. Le but n'est pas de se substituer a la documentation technique foumie 
par Apple aux developpeurs, mais d'avoir une approche differente, peut-etre plus 
illustree, et surtout en frangais. Nous espeions qu'il aidera le programmeur en herbe a 
se familiariser avec les concepts (nouveaux s'il n'a jamais tatg de la programmation en 
Macintosh) qu'il faut obligatoirement maitriser pour ecrire un vrai programme 
Apple IIGS. 

Le langage choisi pour assurer I'interface avec la boite a outils est le langage C. Ce 
langage a la reputation d'etre compliquS a utiliser et difficile a relire. On lui reproche 
parfois d'avoir les inconvinients de la programmation structured sans en presenter les 
avantages, etc. A notre avis, C presente le meilleur rapport performance/facilite 
d'emploi du marche. Grace a ses primitives permettant la programmation structured 
(et done ['absence de I'instruction GOTO), on peut faire des programmes extreme- 
ment lisibles : au d£veloppeur de ne pas embrouiller a souhait le lecteur potentiel par 
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l'emploi de structures tarabiseotees ou de pointeurs a tort et a travers. Plus permissif 
que Pascal, il sera done moins bavard. Certains operateurs permettant la manipulation 
au niveau du bit, il evitera au maximum l'utilisation de 1'assembleur. Enfin, la 
possibility de compilation separee de n'importe quelle fonction permettra la constitu- 
tion de veritables bibliotheques de programmes. 

Pour lire cet ouvrage, il est necessaire de connaitre les rudiments du C, et non 
d'etre un champion de sa manipulation. Pour le novice, la lecture prealable de 
n'importe quel ouvrage d'initiation au C sera amplement suffisante. 

L'ouvrage se veut le plus possible independant de l'environnement de programma- 
tion (et pour cause, aucun n'est vraiment disponible au moment ou nous ecrivons ces 
lignes, comme nous l'avons deja dit). Cela presente I'avantage de I'ouvrir a tout le 
monde {et m6me a ceux qui programment dans un langage autre que le C), au prix 
quelquefois d'adaptations plus ou moins legeres. 

Par exemple, nous verrons dans cet ouvrage la definition de structures, telle que 
celle du rectangle : 

struct _Rect { 

int top : r coordonnfie verticale du coin superieur gauche */ 

int left • r coordonnee horizontals du coin sirpeneur gauche */ 

int bottom ; F coordonnee verticale du coin superieur droit "I 

int right : f coordonnee horizontale du coin sups' rieur droit "/ 
); 

#define Bert struct _Rect 

Dans cette definition, le rectangle est une structure comportant quatre entiers. Un 
rectangle sera manipule par l'interme'diaire d'un pointeur, ainsi que le montrent les 
lignes suivantes : 

Reef r; F r est declare com me un rectangle V 

FrameRect{&r); f un pointeur sur rectangle est utilise 1 7 

Notons au passage l'emploi du style italique pour designer les champs de structures 
et certains autres termes definis dans l'environnement de d£veloppement (et dont ils 
peuvent dependre), et l'emploi du style gras pour designer les sous-programmes 
appartenant a la Toolbox. 

Une autre facon de definir le rectangle suit, sans utilisation de structure. On notera 
la difference dans la syntaxe, m£me si le resultat est parfattement equivalent a celui de 
l'exemple precedent. 



int r[4]; F chatne de quatre entiers 7 

F r[0] - coordonnee verticale du coin sup4rieur gauche 7 
F r[1] = coordonnee horizontals du coin superieur gauche •/ 
f r[2] - coordonnse verticale du coin interieur droit 7 
f r[3] =■ coordonnee horizontale du coin inferieur droit V 

FrameRect(r); F un pointeur sur chaine est utilise 7 



Dans le premier cas, on utilisait l'operateur & pour prendre 1'adresse d'une 
structure. Cette operation est implicite dans le second cas. 
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Et si nous avions declare la structure de type rectangle de la facon suivante : 

struct { 

int lop ; /* coordonnee vertieale du coin superieur gauche 7 

int left; f coordonnee horizontals du coin superieur gauche 7 

int bottom ; /* coordonnee vertieale du coin superieur droit 7 

int right ; /* coordonnee horizontal© du coin superieur droit 7 
} Reel 

il aurait fallu repeter le mot struct dans chaque declaration ult6rieure : 

struct Red r; I* r est declare comme un rectangle 7 

FrameRect[&r); /* un pointeur sur rectangle est utilise 7 

Cet exemple est donne simplement pour montrer qu'il est souvent facile d'adapter 
la syntaxe de certains appels a son propre environnement de travail. 



Tous les appels Toolbox sont demts en employant une nomenclature empruntee 
au Pascal : alors que le C standard ne connait que la notion de fonction (tout sous- 
programme reserve de la place pour une valeur en retour), Pascal distingue les notions 
de fonction et de procedure ; une fonction retourae une valeur, une procedure non, et 
ne reserve meme pas de place sur la pile. Les sous-programmes de la boite a outils 
agissent a la maniere Pascal. De mime, 1'ordre dans lequel les arguments sont passes 
sur la pile et la facon dont une fonction retourne sur une valeur different entre C et 
Pascal, mais I' environnement de developpement rend cette difference transparent*: au 
programmeur. Les curieux constateront que dans les fichiers headers (ceux qui se 
terminent par .h) du Workshop C d' Apple developpe par Megamax, tous les appels 
Toolbox sont definis avec la directive pascal, et les environnements serieux en C se 
devront de proposer cette directive, qui permet a une fonction C de se comporter 
comme un sous-programme (fonction ou procedure) Pascal. Le debutant n'utilisera 
pas les glue routines et autres fonctions filtres, autrement dit les fonctions qui 
modifient Taction d'un appel Toolbox, mais tres vite on voudra adapter a ses propres 
besoins un dialogue modal ou la procedure d'action d'une barre de defilement, par 
exemple, et une fonction filtre sera indispensable. Cette routine devra obligatoire- 
ment agir comme si elle etait ecrite dans un environnement Pascal (en ce qui concerne 
toutes les valcurs qui transitent par la pile), et la directive pascal sera employee pour 
que la fonction C simule ce comportement. 



Le Pascal est encore present dans la Toolbox en ce qui concerne les chaines de 
caracteres. Sauf QuickDraw qui connait a la fois les chaines C et Pascal, tous les 
managers utilisent les chaines de type Pascal. Une chaine de caracteres est constitute 
d'un nombre variable de caracteres significatifs compris entre et 255. Chaque 
caractere est code (suivant la table ASCII) sur un octet, et un octet supplementaire 
sert a determiner la longueur de la chaine. Ainsi, une chaine de type C sera terminee 
par le caractere nul (un octet a zeio), qui signifiera fin de chaine. Par centre, Pascal 
utilise en tete de chaine un octet dont la valeur donne le nombre de caracteres 
significatifs qu'elle contient. Par suite, seule la chaine vide de caracteres a la meme 
definition en C et en Pascal : elle est constitute d'un seul octet, qui contient la valeur 
zero. Des qu'une chaine n'est plus vide, la difference apparait. La chaine « Texte ■ 
sera ainsi codec, suivant le langage utilise (chaque carre represente un octet) : 



INTRODUCTION I 21 



84 


101 


120 


116 


101 





c 

Pascal 


T 


'e' 


'X' 


T 


'e' 


\0 






















5 


84 


101 


120 


116 


101 


\5 


T 


'a' 


'X' 


T 


V 



Un environnement C digne de ce nom fournira des fonetions permettant de passer 
de l'une a l'autre des representations, puisque les managers ne connaissent que la 
forme Pascal ; un titre de fenetre, un article dans un menu deroulant seront des 
chaines Pascal, On pourra toutefois les £crire directement, au niveau des declarations 
de variables : 



char pstring[ ] = "\32Ceci est une chains Pascal"; 

Rappelons qu'on peut inclure en C un octet de valeur queleonque dans une chaine 
de caracteres, en utilisant la forme \xxx oil xxx est la valeur de I'octet en base 8 
(octal), L'instruction precedente creera une chaine un peu particuliere, puisque le 
premier octet contiendra la longueur de la chaine (32 en base 8 egale 26 caracteres), ce 
qui lui permettra d'etre utilised par les managers. Mais le compilateur C lui ajoutera 
tout de meme I'octet mil de fin de chaine C. Certains environnements, encore plus 
sympathiques, permettront la directive \P qui nous evitera de compter les caracteres 
de la chaine et de faire la conversion octale : le compilateur s'en chargera tout seul : 



char pstring[ ] - "\PCect est une chatne Pascal"; 



A vous de verifier les possibtlites de votre environnement de travail. 

II est meme possible que certains environnements fassent des conversions Pascal/C 
de maniere interne, par utilisation de glue routines. Par exemple, nous verrons une 
fonction, GetWTitle, qui retourne un pointeur sur le titre d'une fenetre donnee, Ce 
pointeur pointe sur une chaine Pascal, puisque e'est ainsi qu'un titre est g£r£ par la 
Toolbox. Grice a un tour de passe-passe, certains compilateurs peuvent vous en faire 
une chaine C, sans que vous n'ayez rien demande ! C'est interessant si vous voulez 
manipuler ce titre avec des outils de la bibliotheque C (concat, par exemple), mais 
d£sastreux si vous destiniez ce pointeur a servir d'argument a une autre routine de la 
Toolbox ! (voir un tel exemple dans le chapitre consacre" au Menu Manager). 

Une autre subtilite" Me au microprocesseur 65816 est a prendre en consideration. 
Quand une valeur est code'e sur deux octets (c'est le cas des entiers), nous I'ecrirons en 
C sous la forme hexaderimale OxPPMM, oil PP designe I'octet le plus significatif et 
MM I'octet le moins significatif. Pour que le 65816 (a I'instar de son ancetre le 6502) 
puisse comprendre cette valeur, elle sera codee MMPP en langage machine (les octets 
sont inverses). Dans cet ouvrage, les octets seront decrits dans 1'ordre oil on les £crit 
en C, et non tels qu'ils sont transcrits en mgmoire (ceci est particulierement important 
au niveau de la definition des couleurs, composante par composante). 

Un entier long {sur 4 octets) sera code OxAABBCCDD en langage C et traduit 
SDDCCBBAA en me"moire. Les deux groupes de 16 bits sont eux aussi inverses. 

A cause de ce genre de subtilite, les deux lignes suivantes ne sont pas du tout 
equivalentes sur I' Apple IIGS, alors qu'elles le seraient sur Macintosh : 



vectl [6] - {Ox0F,OxAB,0x23,OxC7,OxD0,0x1 E}; 
vect2[3j > (OxOFAB.Ox23C7.0xDQ1E); 
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En effec, vectl est repr£sent£ en me" moire par la sequence hexaddcimale 
OFAB 23C7 DOIE, tandis que vect2 est code ABOF C723 DOIE... ce qui fait une 
sacrSe difference ! Attention done a ceux qui deTvniront des curseurs de manure non 
structure (voir le chapitre III sur QuickDraw). 

La suite de cet ouvrage obelra aux conventions suivantes : 
char variable sur I octet char* pointeur sur earactere (occupe 4 octets) 
int variable sur 2 octets int* pointeur sur entier (occupe 4 octets) 
long variable sur 4 octets long* pointeur sur entier long (occupe 4 octets) 

On defmira les pointeurs et les handles (voir le chapitre Memory Manager) de la 
maniere suivante : 



typedef char * Pointer. 
typedef Pointer * Handle; 

Ouand des variables prendront des valeurs bool^ennes, elles seront codecs sur 
2 octets et prendront la valeur TRUE ou FALSE, ainsi dfifinies : 

#define TRUE (-1) 

#define FALSE 



La valeur - 1 pour TRUE signifie que les 16 bits sont a 1 , la valeur pour FALSE 
que les 16 bits sont nuls. Quand une valeur booleenne sera retournee par une 
fonction, on ne testera jamais son egalite a TRUE, mais son inegalit£ a FALSE : on 
ne se posera jamais la question xxx is true ? mais xxx is not false ? 

En C, on ne se pose meme pas la question : toute valeur nulle est fausse, toute 
valeur non nulle est vraie. Si valeur est la valeur a tester, on n'^crira jamais : 

if (valeur == TRUE) ... 



if (valeur) ... 

ou a la rigueur : 

if (valeur != FALSE) ... 

La premiere de ces trois expressions pourrait conduire au t€ suit at inverse de celui 
qu'on espere, les deux autres ne presentent pas ce risque. Par contre, pour assigner 
une valeur booleenne a une variable, on ecrira : 

valeurl = TRUE; 
valeur2 = FALSE; 

Autre valeur a dgfinir, zdro-long. Nous emploierons souvent cette expression, qui 
deagne tout simplement la valeur nulle sur 4 octets. Suivant l'environnement de 
d£veloppement, elle sera peut-etre pr^d^finie sous 1'appellation NIL ou NULL. 
L'important, e'est qu'il s'agisse de 32 bits tous nuls ! 
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APERQU DES OUTILS 

GENERALITES SUR LES OUTILS 

Pour developper des applications dans le respect de 1'interface utilisateur, mais 
aussi pour etre stir qu'elles resteront compatibles avec revolution future inevitable du 
systeme, Apple met a la disposition du d^veloppeur un ensemble de routines, 
groupies par themes, localises soil en memoire morte, sott dans des repertoires 
particuliers de la disquette systeme et charge's en memoire vive au moment de leur 
utilisation. 



Identification des outils 

Chaque outil (appelons outil un groupe de routines formant un ensemble coherent) 
possede un numero d'identification qui lui est assigne de maniere permanente et 
definitive. Les outils actueilement assignes sont ies suivants : 

OutUs en ROM Outils en RAM 

1. Tool Locator 14- Window Manager 

2. Memory Manager 15, Menu Manager 

3. Miscellaneous Tools 16. Control Manager 

4. QuickDraw II 17. System Loader 

5. Desk Manager 18. QuickDraw auxiliary 

6. Event Manager 19. Printer Driver 

7. Scheduler 20. Line Edit 

8. Sound Tools 21. Dialog Manager 

9. Apple Desktop Bus 22. Scrap Manager 

10. SANE 23. Standard File 

11. Integer Math 24. Disk Utilities 

12. Text Tools 25. Note Synthesizer 

13. Utilisation interne 26. Note Sequencer 

27. Font Manager 

Ces outils se trouvent soit en memoire morte, soit sur disquette et charges en 
memoire vive (sous la responsabilite de 1 'application) au moment de leur utilisation. 
Le premier outil, le Tool Locator, est I'outil des outils. C'est lui qui permet le 
chargement des routines, qu'elles soient en memoire morte ou sur disquette, et qui 
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permettra les Evolutions futures. Tel outil actuellement en mEmoire morte pourrait 
subir des modifications (patches) et se retrouver en partie sur disquette dans une 
version ulteneure. Au contraire, tel outil actuellement sur disquette pourrait se 
retrouver un jour en mfimoire morte, Etant donne ses possibilites d'extension. Grace 
au Tool Locator, une application ecrite correctement n'aura pas a etre modifiee 
lorsque ces modifications eventuelles interviendront (et elles interviendront sure- 
ment : il n'est pas d'exemple de mEmoire morte sans bug). Le Tool Locator sera 
Etudie dans le paragraphe suivant. 

Dans cet ouvrage, nous etudierons certains outils de la liste, lies a I'emploi de 
1'interface utilisateur (feneJtres, menus, contrflles, dialogues) et d'autres ndcessaires h 
leur emploi (gestion mEmoire, gestion graphisme). Ces outils, et tous les autres, sont 
decrits de manure exhaustive dans la documentation technique (en anglais) foumie 
par Apple. En void une tres rapide description (les outils precedes du signe O sont 
Etudjgs dans cet ouvrage, ceux preceded du signe - sont evoquEs dans le chapitre X). 

o Tool Locator est I'outil qui permet aux outils et a ['application de communiquer, 
II est possible d'en crEer d'autres que ceux fournis par Apple, le Tool Locator saura les 
gerer. 

o Memory Manager gere la memoire de 1'Apple IIGS quand celui-ci est utilise en 
mode natif (c'est-il-dire quand il n'utilise pas le mode Emulation, pour faire toumer les 
anciens programmes Apple lie ou lie). 

- Miscellaneous Tools gere des routines tres proches de la machine, pour gerer la 
memoire permanente (par exemple tout ce qui est g£r£ par 1'accessoire de bureau 
Tableau de Bord), 1'horloge interne (lire ou ecrire 1'heure), les interruptions et le 
vertical blanking, les erreurs fatales (plantage du systems), 1'interfacage avec la souris, 
le compactage des images, certaines manipulations de chaines de caracteres, etc. 

O QuickDraw II (dans la suite nous dirons QuickDraw) gere tout le graphisme 
super haute resolution (dans les deux modes possibles) : tout ce qui apparait a I'ecran 
dans ces modes depend de QuickDraw. 

- Desk Manager gere les deux types d'accessoires de bureau : accessoires de 
bureau classiques, obtenus par Pomme - Controle - Escape, et accessoires nouveau 
style, presents dans le menu 4 . 

O Event Manager g£re les evenements (clic souris, touche enfonc£e, etc.). 

• Scheduler s'occupe de gerer certains delais quand des accessoires de bureaux ou 
d'autres Itches essaient d'utiliser des ressources occupies. 

• Sound Tools permet a une application d'accEder au hardware li£ au son sans 
connaitre la moindre adresse d'entree-sortie, et d'alimenter les 64 Ko de memoire 
dedies a la gestion des sons. Deux configurations sont possibles, Tune pour une 
gestion compatible avec les anciens Apple II, 1' autre pour prendre en compte les 
possibility du Digital Oscillator Chip d'Ensoniq. 

• ADB permet la gestion de 1' Apple Desktop Bus (pour programmer des 
p^riphenques d'entrees sur la prise clavier, tels un joystick, un lecteur de codes k 
barres, une tablette graphique ou un clavier musical). 

• SANE (Standard Apple Numerics Environment) est un ensemble de routines 
permettant les calculs en virgule flottante (sur 32 bits, 64 bits ou 80 bits). L'utilisation 
de ces routines est imperative pour bgneficier par exemple des vertus d'un futur 
coprocesseur arithmdtique. Un environnement de developpement rendra generale- 
ment transparente l'utilisation de SANE, s'il est prEvu pour s'en servir. 
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• Integer Math Tools est un ensemble de routines permettant calculs et conversions 
sur entiers longs et nombres fractionnaires particuliers. 

• Text Tools permet ['utilisation par une application respectant ('interface utilisa- 
teur des and ens modes texte (40 et 80 colon nes) avec quelques ameliorations : le texte 
et le fond peuvent prendre une couleur parmi 16 possibles (ce sont les couleurs 
permises par le Tableau de Bord). 

© Window Manager est le gestionnaire de fen£tres. 

o Menu Manager est le gestionnaire de menus deroulants. 

O Control Manager est le gestionnaire de controles, 

O System Loader permet a une application d'etre decouple en plusieurs segments. 
Une de ses fonctions sera de charger en mdmoire vive les segments non presents 
nScessaires a la bonne marche de ['application. Fait partie integrante du systeme 
d'exploitation de la machine. 

• High level Printer Driver fournit des routines permettant a 1'application 
d'imprimer, quelle que soit 1'imprimante en ligne (pourvu que le driver propre k 
1'imprimante soit present). Ces routines appellent celles du Low level Driver, plus 
proches de la machine. 

O Line Edit fournit des routines d'edition de texte (insertion, copier-coller, etc.). 
o Dialog Manager est le gestionnaire de dialogues et alertes. 

- Scrap Manager est le gestionnaire de presse-papier, grace auquel differentes 
applications peuvent s'dchanger des informations par copier-coller. 

- Standard File fournit les fenetres standard pour r^pondre aux articles Ouvrir... 
et Enregistrer... du menu Pichier (ouverture des fichiers, sauvegarde des fichiers). 

• Disk Utilities permettent notamment ['initialisation des disquettes et la duplica- 
tion des fichiers. 

• Note Synthesizer et Note Sequencer offrent des routines de haul niveau pour 
faire de la musique et de la synthese vocale grace au Digital Oscillator Chip 
d'Ensoniq. Le s^quenceur est capable de jouer une partition avec les instruments 
tit-finis par le synth£tiseur. 

- Font Manager permet ('utilisation de divers jeux de caracteres et de divers styles 
a I'inte'rieiir de chaque police. 



Identification des routines d'un outil 

Dans un outil donne, chaque routine (procedure ou fonction) possede un 
identifiant. Le couple identifiant de 1'outil/identifiant de la routine determine un sous- 
programme de la boite a outils de mani&re unique. Les huit premiers identifiants dans 
chaque outil ont une signification particuliere et similaire d'un outil a 1'autre : 

1. Routine d'initialisation au moment du boot (suffixe Bootlnii). 

2. Routine d'initialisation au niveau de 1'application (suffixe StartUp). 

3. Routine de deallocation a la fin de 1'application (suffixe SkutDown). 

4. Fonction retournant le numero de version de Toutil (suffixe Version). 

5. Routine a ex£cuter en cas de Reset (suffixe Reset). 

6. Fonction retournant le statut actif/non actif d'un outil (suffixe Status). 

7. Reserve 1 . 

8. Reserve. 

• Les routines de suffixe Bootlnit sont executees lors de la phase de demarrage du 
systeme, les outils en memoire morte par le ROM startup code et les outils sur 
disquette au moment de leur installation dans le systeme, Ces routines ne devront 
jamais etre appelees par une application. 
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• Les routines de suffixe Startup sont appelees dans un ordre rigoureux par 
['application a son demarrage. Elles initialisent les outils, r£servent de la memoire, 
etc. Tout appel a une routine de la Toolbox sans avoir prealablement initialise I'outil 
auquel elle appartient se soldera invariablement par des resultats non maitrises ou par 
un plantage du systeme. Les outils non utilises par une application et par les autres 
outils n'auront pas besom d'etre initialises. Si une application tente d'initialiser une 
deuxi&me fois un outil, elle recevra un message d'erreur mais il ne se passera rien de 
grave. Voir le chapitre XII pour une sequence type d'initialisation des outils. 

• Les routines de suffixe ShutDown sont appelees par 1'application au moment ou 
elle s'acheve, dans 1'ordre inverse des initialisations. Toute la memoire occupee par les 
outils est ainsi liberie, ce qui permet a 1'application qui prend la main (generalement 
le Finder), de travailler dans des conditions correctes. Voir le chapitre XII pour une 
maniere type de quitter une application. 

• Chaque outil possede un num£ro de version (sur deux octets) qui lui est propre, 
et qui obeit aux regies suivantes : 

- bit 15 : s'il est a 1, t'outil est encore a l'£tat de prototype, dans une 

version non definitive ; 

- bits 14 a 8 : num£ro majeur de la version (au moins 1 pour une version non 

prototype) ; 

- bits 7 a : numero mineur de la version (d^marre a 0). 

Les fonctions de suffixe Version retournent le num£ro de version de 1 'outil. Ainsi, 
une valeur telle que $0103 signifie qu'on utilise la version 1 apres trois modifications 
mineures, une valeur telle que S800A qu'on a affaire <i la dixieme version d'un outil en 
cours de developpement. Ce numero de version est tres utile pour la compatibility 
future : certaines applications ne pouvant tourner avec des versions trop anciennes des 
outils pourront refuser de dSmarrer en donnant un message d'erreur explicite, plut6t 
que de se planter lamentablement (voir plus loin le Tool Locator, et dans le 
chapitre XII un exemple d'utilisation de ces fonctions). 

• Les routines de suffixe Reset sont appelees de maniere interne des que 
I'utilisateur force un Reset, en appuyant simultanement sur les touches Contr6le et 
Reset. 

Note La combinaison Pomme - Contr61e - Reset est plus draconienne et force la 
reinitialisation de tous les outils, 

• Les fonctions de suffixe Status retournent la valeur TRUE si I'outil dont elles 
dependent est initialise, FALSE sinon. C'est le seul exemple ou on peut appeler une 
routine avant d'avoir initialise son outil d'appartenance, ou apres l'avoir desalloue 
(par ShutDown). 

Sauf en ce qui concerne les routines d'initialisation (suffixe StartUp), nous ne 
d€tailIerons pas dans les difterents chapitres ces routines obligatoirement prSsentes 
dans les outils. Dans les exemples du chapitre XII, nous verrons comment ecrire les 
fonctions C assurant le debut et la fin d'une application valables dans la plupart des 
cas. 



Norn des routines 

Toutes les routines de la ToolBox portent un nom unique. Suivant les environne- 
ments de developpement, il faudra ou non respecter les majuscules et les minuscules 
dans ces noms. Dans les environnements Megamax C, les noms des routines sont 
declares dans des fichiers .h, suivant ['exemple suivant : 

#define dispatcher OxE 10000 

extern pascal void DialogStartUpf ) inline(0x0215, dispatcher): 
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Cette declaration (notons l'instniction speciale inline) cr£e la relation entre le 
coupie num£ro de l'outil/nume>o de routine et le nom qui sera employ^ pour appeier 
cette routine. DialogStartUp est la routine numero 2 de l'outil $15 (Dialog Manager). 
Attention a l'orthographe ! Peu importe tout ce que vous lirez dans cet ouvrage ou 
ailleurs, si votre environnement declare DialogStartUp au lieu de DialogStartUp et 
qu'il fait la distinction entre les majuscules et les minuscules (case sensitive), vous serez 
oblige d'employer son orthographe... ou de corriger son fichier d'interfacage. II est 
toujours bon d'aller y jeter un ceil ! 



Codes d'erreur 



Chaque outil est susceptible de retourner des codes d'erreur. Un code d'erreur 
possede un format parfaitement defini sur l'Apple IIGS : c'est un entier sur deux 
octets, I'octet le plus significatif contenant le numero de l'outil dans lequel 1'erreur 
s'est produite, et le moins significatif donnant 1'enreur proprement dste. 

Suivant les environnements, on pourra r^cuperer certains codes d'erreur (ceux des 
erreurs non fatales en tout cas) dans le registre A (cas de I'assembleur) ou dans une 
variable (dans les environnements Megamax C, cette variable s'appelle jerrno et doit 
£tre declaree en debut de programme). 

Nous signalerons les procedures susceptibles de retourner un code erreur, en 
prdcisant simplement que c'est dans jerrno qu'il faut r£cuperer ce code. 



TOOL LOCATOR 

Sur vol du fonctionnement 



On accede aux routines de la boite a outils par l'interm£diaire du Tool Locator, 
l'outil des outils. Cet outil fonctionne grace a quelques tables, qui permettent ensuite 
une grande souplesse pour les modifications futures. 

Etant donne" un numero d'outil, le Tool Locator peut trouver une entree dans la 
Tool Pointer Table. Cette table contient l'adresse des Function Pointer Tables (chaque 
outil possdde une telle table). Ces tables contiennent a leur tour l'adresse r£elle des 
fonctions, I'entree etant reperee par le numero de la routine. 

Chaque outil en ROM possede sa table d'adresses de routines en ROM. II existe 
aussi en ROM une table d'adresses d'outils (qui ne reference e"videmment que les 
outils en ROM). Une place est fixee en m^moire vive pour recevoir l'adresse de la 
table des outils en ROM, initialisee au d£marrage du systeme. De sorte que, si du jour 
au lendemain Apple decide de modifier ses m£moires mortes, le systeme n'aura qu'a 
donner la nouvelle adresse de la table pour que tout continue a fonctionner. 

Les outils ayant besoin d'un peu de memoire pour fonctionner, le Tool Locator 
gere une derniere table d'adresses, la Work Area Pointer Table, qui d£signe pour 
chaque outil l'adresse de 1'espace memoire qu'il s'est r£serve\ 

Nous n'entrerons pas dans les details de ce qui se passe durant le d£marrage du 
systeme, mais il faut savoir que les outils en memoire morte sont charges automatique- 
ment, pas les outils r^sidant sur la disquette systeme : il est de la responsabilite de 
I'application de les charger. 
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Routines a utiliser 



Nous ne verrons dans ce pafagraphe que les routines dont 1 'utilisation est 
obligatoire pour faire fonctionner une application. 

Comme tout autre outil, le Tool Locator necessite une initialisation avant de 
pouvoir etre utilise. Cette tache est assured par la procedure TLStartUp, sans 
argument. 

Le chargement des outils qui ne sont pas en ntemoire morte peut s'effectuer de 
plusieurs manieres : la procedure LoadTools charge plusieurs outils a la fois, alors que 
la procedure LoadOneTool, comme son nom l'indique, n'en charge qu'un a la fois et 
peut etre contrebalancee par un appel a UnloadOneTool, qui supprime 1 'outil de la 
memoire. 

LoadOneTool admet deux arguments : le numero de 1'outil et la version minimale 
de 1'outil a utiliser. Si, par exemple, pour une raison ou pour une autre, une 
application ne peut marcher qu'avec une version 1.03 ou posterieure du Window 
Manager, on pourra trouver 1'instruction suivante dans les premieres lignes de 
programme : 

LoadOneTool (14, 0x0 103); 

Si le fichier Tool014 sur le disque de demarrage correspond a une version 1.03 ou 
posterieure (1.04, 2.00, ..,), 1'outil sera charge. Si le fichier correspond a une version 
anterieure (1.02, $8101, ...), le fichier ne sera pas charge et le code erreur $0110 
(version error) sera retourne suivant la ntethode generate (dans la variable .errno). 
Notons que toute erreur detectee par le System Loader ou ProDOS durant cet appel 
sera egalement repercutee. 

Mais comment prevenir 1'utilisateur qu'une erreur est survenue ? La methode 
normale de 1'interface utilisateur est d'afficher une fenetre d'alerte (voir le chapitre IX 
consacre au Dialog Manager). Ici c'est impossible puisque c'est le gestionnaire de 
fenetres lui-meme qui ne peut etre charg^ ! 

Le Tool Locator off re deux fonctions pour repondre a ce probleme : TLMountVo- 
lume (qui simule une fenetre d'alerte) et TLTextMountVolume (qui utilise le mode 
texte classique 40 colonnes). Deux lignes de message peuvent etre affichees (se limiter 
a 36 caracteres environ), et les fonctions retourneront la valeur 1 si le bouton 1 ou 
Retour est choisi par 1'utilisateur, la valeur 2 si le bouton 2 ou Escape est choisi. 

La fonction TLMountVolume admet six arguments : 1'abscisse et 1'ordonnee du 
coin superieur gauche de la pseudo-fenetre d'alerte (en coordonnees ecran, voir le 
chapitre sur QuickDraw), un pointeur sur la premiere ligne de texte, un pointeur sur 
la deuxieme ligne de texte, un pointeur sur le texte du premier bouton (equivalant a 
OK), et un pointeur sur le texte du deuxieme bouton (equivalant a Annuler). Elle 
utilise le mode super hi-res, il est done imperatif que QuickDraw ait £te initialise ; elle 
utilise le clic souris, il est done imperatif que 1'Event Manager ait ete initialise, et la 
procedure lnitCursor executee. Voir le chapitre XII pour un exemple complet. 

La fonction TLTextMountVolume admet quatre arguments, identiques aux quatre 
derniers arguments de TLMountVolume. Du fait qu'elle utilise le mode texte 
40 colonnes, aucune initialisation autre que celle du Tool Locator n'est requise. Cette 
fonction pourra etre appelde quand on n'est pas sur de pouvoir charger QuickDraw et 
1'Event Manager, parce qu'on veut forcer pour leur utilisation un numero de version 
parti culier. 

Pour charger plusieurs outils en un seul appel, on utilisera la procedure LoadTools, 
avec pour seul argument un pointeur sur une table ayant le format suivant : 

- un entier donnant le nombre d'outils a charger ; 

- pour chaque outil, deux entiers : son identifiant et la version minimale autorisee. 
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LoadTools retourne des codes d'erreur identiques a LoadOneTool (Version error, 
erreurs de chargement et erreurs ProDOS). 

Pour charger en une seule instruction Window Manager, Menu Manager, Control 
Manager, Line Edit, Dialog Manager, Scrap Manager et Standard File, on procfdera 
de la maniere suivante : 

int tools[ ] « ( 

7. r sept outils a charger */ 

14, 0x0100, r Window Manager a parOr de la version 1 .00 V 

1 5, 0x01 00, r Menu Manager k partir da la version 1 ,00 */ 

16, 0x01 00, r Control Manager a partir de la version 1 .00 V 

20, 0x0100, r Line Edit k partir de la version 1 .00 V 

21 , 0x0100, r Dialog Manager a partir de la version 1 .00 V 

22, 0x01 00, r Scrap Manager a partir de la version 1 .00 */ 

23, 0x01 oo T Standard File a partir de la version 1 .00 V 

}; 

LoaaTools{tools) ; /* charge les 7 outils */ 

Si une application est divisee en plusieurs segments et qu'ils ne sont pas tons 
statiques (c'est-a-dire qu'ils ne sont pas obliges de resider continuellement en memoire 
vive), si un segment non statique est seul a utiliser un outil particulier, on peut avoir 
envie de supprimer cet outil de la memoire en nulme temps que le segment. Ce qui 
sera fait avec la procedure UnloadOneTool, qui recevra en argument I'identifiant de 
1'outil a effacer. Aucune erreur ne sera geri£r£e, merae si l'outi! n'a pas ete charge ou a 
deja ite" efface. 



CHAPITRE II 



MEMORY MANAGER 



MEMOIRE DE L' APPLE IIGS 



Notre propos n'est pas dans ce chapitre d'entrer dans des details trop techniques 
sur I'organisation de la memoire de l'Apple IIGS. Cependant, quelques notions 
fondamentales sont a connaitre, et nous allons nous y arreter quelques instants, 

Le microprocesseur 65816 au cceur de la machine est capable de gerer les adresses 
sur 24 bits, c'est-a-dire qu'il est capable d'adresser jusqu'a 16 Mo, La memoire est 
formed de blocs de 64 Ko appele"s banques. Chacune des 256 banques possibles est 
num^rotee de a $FF. La machine possede en termes de memoire accessible les 
caracteristiques suivantes : 

- banques et 1 : 128 Ko de memoire vive. La banque joue un r61e tres 
important, puisqu'elle contient le stack (pile par oil transient les arguments que se 
passent les programmes et sous-programmes, fonctions et autres procedures) et les 
diverses pages z£ro, qui interessent particulierement un mode d'adressage privilegie 
du microprocesseur. 

- banques 2 a $7F : extension de la memoire vive (jusqu'a 8 Mo). 

- banques $E0 et SE1 : 128 Ko de memoire vive. C'est notamment sur ces 
banques que se trouve la memoire £cran. Tout ce qui apparait sur un dcran 
d' Apple IIGS, aussi bien en mode natif qu'en mode emulation 6502, transite par ces 
banques. 

- banques $FO a $FD : extension de la memoire morte (jusqu'a 1 Mo). 

- banques $FE et IFF : 128 Ko de m6moire morte standard. 

C'est dans toute cette etendue de memoire par blocs que les applications vont 
pouvoir stocker le contenu de leurs variations et des objets qu'elles manipulent. Le 
Memory Manager a pour mission de prendre en charge toute la gestion de cette 
memoire, et d'en optimiser si possible ['utilisation. Le programmeur devra faire tres 
attention a la facon dont il sollicitera le Memory Manager, et avoir continuellement a 
1'esprit qu'il n'a pas le droit de tout utiliser pour lui : l'Apple IIGS est concu pour faire 
fonctionner plusieurs applications en meme temps (11 n'est pas multitaches, mais il est 
possible de charger plusieurs applications simultanement en memoire (du moins en 
theorie), et de les utiliser a tour de role, en switchant presque instantanement de l'une 
k 1 'autre). 
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Notons que 64 Ko de memoire non evoques ci-dessus sont la propriete exclusive du 
coprocesseur sonore Ensoniq DOC, et qu'ils sont accessibles en utilisant les routines 
de Sound Tools, non traitees dans cet ouvrage. 



UTILISATION DU MEMORY MANAGER 



Blocs fixes et pointeurs, 
blocs relogeables et handles 

Dans la memoire de ['Apple IIGS vont cohabiter deux types d'objets : les objets 
fixes et les objets relogeables. Par la suite, nous parlerons d'objets, mais aussi de blocs 
memoire repr^sentant ces objets. 



M6moire 



pointeur 



r^H 



Figure 11.1. Pointeur et bloc fixe 

• Les blocs fixes represented des objets dont I'adresse n'a pas le droit de changer : 
le programme qui les manipule attend ces objets a une adresse precise, et se plantera a 
coup sur s'il ne les trouve pas a leur place. Ces blocs seront reperes par des pointeurs 
(Figure II.l). 

Qu'est-ce qu'un pointeur ? Tout simplement un objet qui contient I'adresse de 
debut d'un bloc fixe, De tels objets seront representes sur 4 octets (meme si 3 auraient 
suffi, puisqu'on a deja dit que le bus d'adresses du 65816 contenait 24 bits). 

• Les blocs relogeables represented des objets dont I'adresse n'est pas fixe dans la 
memoire. Des qu'il le jugera necessaire, le Memory Manager d£placera ces blocs pour 
essayer d'optimiser I'occupation de la memoire, en comblant tant que faire se peut les 
trous laisses entre les blocs fixes. De tels blocs sont reperes par des handles, des 
pointeurs sur des pointeurs maitres (Figure II. 2). 

Qu'est-ce qu'un pointeur maitre ? C'est un bloc fixe contenant I'adresse actuelle 
d'un bloc relogeable. II faut bien comprendre le schema suivant : un handle connait 
I'adresse d'un bloc fixe connaissant I'adresse d'un bloc relogeable. Quand le bloc 
change de localisation, il est de la responsabilite du Memory Manager de stocker sa 
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nouvelle adresse dans ie pointeur maitre qui le repere. Le handle n'est pas modifM 
dans ]'ope>ation. C'est done un pointeur particulier : il sera lui aussi stocks sur 
4 octets. 



Memoire 

















handle 




















m ^ m 



bloc 
relogeable 



pointeur 

ma fire 

(bloc fixe) 



Figure II.2. Handle ct Woe retogeabk. 

Remarque Contrairement a celui du Macintosh, le Memory Manager de P Ap- 
ple I1GS ne conn ait pas veritablement les pointeurs : un bloc fixe est rep6re par un 
handle, tout comme un bloc relogeable. C'est ['application qui gerera le pointeur, en 
derSterencant le handle, (Voir la section « Initialisation, allocation de blocs m€- 
moire » de ce chapitre). 
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Figure 11,3. Fragmentation de l» memoire 
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Fragmentation et compactage de memo ire 

Une application va allouer des blocs de memoire au fur et a mesure de ses besoins, 
et va les desallouer des qu'elle en aura termine avec leur utilisation. Ces operations 
pouvant intervenir dans n'importe quel ordre, on finira par avoir au bout d'un certain 
temps une memoire constitute de blocs libres perdus au milieu de blocs allou^s (en 
cours d' utilisation). Beaucoup de place perdue, puisque 1'allocation d'un bloc ne peut 
se faire que d'un seul tenant. On peut arriver au paradoxe de ne pouvoir allouer un 
bloc m£me s'il y a assez de mejmoire disponible, tout simplement parce que cette place 
disponible est crop morcelee (Figure II.3). 
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Figure 11.4. Compactage de La memoire. 
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Figure [1.5. Les blocs fixes peuvent 
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C'est pourquoi le Memory Manager essaie de temps a autre de compacter la 
memoire. En quoi faisant ? Tout simplement en de'plagant les blocs relogeables de 
telle sorte qu'ils comblent le maximum de vide, libelant par la meme occasion un 
maximum d'espace en continu. Les blocs fixes ne sont evidemment pas d6 places, et 
constituent des ilots inamovibles dans la memoire (Figure II. 4). Pire : si un bloc 
relogeable est coined entre deux blocs fixes, meme un compactage ne pourra Ten faire 
sortir (Figure II. 5). Four eviter ce genre de situation, le Memory Manager essaie 
d'allouer les blocs fixes vers le bas de la memoire, et les blocs relogeables vers le haut. 

Dans la mesure du possible, les objets que manipule une application devraient etre 
trails comme des blocs relogeables, afin de faciliter le compactage et done g&cher 
moins de memoire. 



Blocs verrouilles et blocs purgeables 

Quand on est en train d'utiliser un bloc de memoire relogeable (par exemple, 
quand on transfere la representation memoire d'une image vers la memoire ecran), il 
peut s'averer inopportun de voir subitement son bloc se d^placer lors d'un 
compactage ! Les rtsultats les plus imprevisibles pourraient en decouler... 

Le Memory Manager offre la possibility de verrouiller provisoirement un bloc 
relogeable. Quand un bloc est verroutlu*. c'est comme si on avail affaire a un bloc 
fixe : un compactage ne le fait pas changer d'adresse. Des qu'on a fini de trailer le 
bloc, il faut le deverrouiller (sinon, on perd tout le b£n£fice d'un bloc relogeable par 
rapport a un bloc fixe). 

Un bloc dont on n*a plus besoin peut etre rendu purgeabie. Un bloc purgeable ne 
disparait pas imm^diatement de la memoire, mais seulement en cas de besoin, quand 
apres compactage le Memory Manager est toujours incapable d'allouer un nouveau 
bloc. II y a trois niveaux de priority dans la purgeabilitS d'un bloc : les blocs 
purgeables de niveau III seront purges avant les blocs de niveau 2 et 1 (le niveau 
signifiant non purgeable). 
Attention Un| bloc verrouillS ne peut etre purged 

Remarque Le| niveau 3 de purge est utilise par le System Loader et ne devrait pas 
etre utilise par une application. Quand une application est terminer, les segments de 
programmes qu'elle utilise ne sont pas effaces de la memoire, mais seulement rendus 
purgeables au niveau 3. De la sorte, si l'application devait de nouveau etre appelSe, il 
n'y aurait pas a la recharger en memoire. Si le systeme a besoin de memoire entre 
temps, il effacera ces blocs inutiles : des qu'un bloc de niveau 3 est purge, tous les 
autres le sont aussi, 

Quand un bloc relogeable est purge, son pointeur maitre reste allou6 et prend la 
valeur zero-long (NIL). Dans ce cas precis, le handle est appelfi handle vide. Les 
donnees que contenait le bloc sont definitivement perdues (elles doivent etre recre^es 
par le programme pour une nouvelle utilisation). 



Attributs de blocs memoire 

Chaque bloc de memoire possede un certain nombre d'attributs, stocked sur un 
mot de 16 bits : 

- bit : banque fixe. Si ce bit est positionne\ le bloc doit imperativement 
commencer dans une banque specifiee. Par exemple, 1'allocation d'un bloc a utiliser 
comme page z£ro doit imperativement se situer dans la banque ; 

- bit 1 : adresse fixe. Si ce bit est position^, le bloc doit imperativement etre 
alloue a une adresse precise. Par exemple, le systeme alloue la memoire ecran i une 
adresse immuable ; 

- bit 2 : alignement de la page. Si le bloc doit etre aligne sur une page, ce bit doit 
etre positions ; 
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- bit 3 : non-utilisation de memoire speciale. Certaines parties de la memoire sont 
qualifiees de speciales, car des restrictions sont a apporter a leur utilisation (ce sont les 
parties utilises en emulation Apple He). Si ce bit est positionn£, le bloc ne pourra pas 
se trouver dans ces parties de memoire speciales ; 

- bit 4 : non-chevauchement. Si ce bit est positionn6, le bloc ne pourra pas scaler 
sur deux banques distinctes. C'est le cas notamment des segments de programmes , 

- bits 8 et 9 : niveau de priorite pour la purge. Ces bits seront a zero a 1'allocation 
du bloc, et modifies par la suite ; 

- bit 14 ; bloc fixe. Si le bit est positionne, le bloc est fixe ; s'il est a zero, le bloc est 
relogeable. En regie getierale, un segment de programme constituera un bloc fixe, et 
un bloc de donnees devrait etre relogeable ; 

- bit 15 : bloc verrouille. Si le bit est positionne, le bloc est verrouille, done 
provisoirement fixe et non purgeable. A 1'allocation d'un bloc relogeable, ce bit 
devrait etre a zero. 



EXEMPLES D'UTILISATION 
Initialisation, allocation de blocs memoire 



int my Id; f identifiant de I'appli cation */ 

Hands theHdl: /* un handle V 

Pdinlsr zeropg : f* W pointeur */ 

myld = MHStartUp{ ); /* initialisation du Memory Manager 7 

theHdl - NewHan die [0x800 L, myld. Ox CO0 1, OL); f allocation d'un nouveau bloc (fixe) 7 

zeropg - * theHdl; /* pointeur sur bloc fixe 7 



• Comme tous les gestionnaires que nous aliens etudier, le Memory Manager doit 
etre initialise et c'est seulement ensuite que nous pouvons utiliser les procedures et 
fonctions qui le composent. C'est la fonction MMStartUp qui assure l'initialisation du 
Memory Manager. Elle retourne dans un entier un identifiant dont ('importance est 
capitale, puisqu'il servira de maniere interne a identifier l'application : tout bloc de 
memoire alloue par une application gardera trace de cet identifiant, ce qui permettra 
notamment au Memory Manager d'evacuer tous ces blocs quand elle sera terminee. 
Pour avoir une vision d'ensemble du debut et de la fin d'une application, consulter le 
chapitre XII. 

• Pour allouer un nouveau bloc de memoire, on utilise ra la fonction New Handle, 
qui reclame quatre arguments : 

- le premier argument donne la taille en octets du bloc a allouer. Cette taille est 
codec sur quatre octets (entier long). Dans l'exernple, on demande au Memory 
Manager d'allouer un bloc de huit pages (rappelons que dans le jargon Apple II, une 
page fait 256 octets, soil $100 octets). 

- le deuxieme argument est 1'identifiant de ('application. Puisque chaque bloc 
gardera memoire de l'application qui l'a cree, cet argument est necessaire. 

- le troisi&me argument decrit les attributs du bloc a allouer, tels qu'ils ont d£ja 
ete definis. Puisque C001 hexa = 1100 0000 0000 0001 binaire, nous demandons un 
bloc verrouille, fixe, dans une banque d£termin£e. 

- le quatrieme argument est un entier long qui sert de complement a 
1'argument precedent. II contiendra une adresse permettant de fixer la valeur de 
certains attributs (banque fixe, adresse fixe). Dans I'exemple, 1'adresse zero-long 
signifie que la banque dans laquelle le bloc doit Stre alloue est la banque zero. 
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Cet exemple permet done d'allouer huit pages z£ro consecutives. La fonction 
New Handle retourne tin handle sur le bloc alloue\ ou z6ro-long si 1 'allocation a echoue 
(pas assez de memoire libre consecutive, me me apres compactage et purge des blocs 
purgeables). 

Remarquons la fa<jon dont on obtient un point eur a partir d'un handle en 
langage C : on affecte a une variable de type pointeur le contenu de la zone pointed 
par le handle qui n'est autre que 1'adresse du bloc. Puisque le bloc est declare fixe, il 
n'y a aucune precaution particuliCre a prendre pour der^ferencer le handle. Pour 
pouvoir parler de Pointer et de Handle en C, il est n£cessaire de d^finir ces types : 

typedef char 'Pointer 
typedef char "Handle 

Si l'application ne doit jamais utiliser le handle quand elle cherche a gerer un 
pointeur sur bloc fixe, il est plus rapide d'ecrire 1'allocation ainsi : 

zeropg = * HewHandlefOxSOOL, myld, 0xC001 , 0L); I* pointeur sur bloc fixe */ 



Inutile de preciser quelles catastrophes pourraient survenir si on faisait la meme 
chose a un bloc relogeable t Remarquons que cette facon d'ecrire interdit ensuite de 
purger le bloc individuellement, puisque le Memory Manager ne sait y acceder que par 
l'intermediaire d'un handle. C'est pourquoi il existe une fonction, Find Hand It qui 
permet de savoir a quel bloc appartient une adresse donnee : on passe en argument 
1'adresse en question, et elle retourne le handle sur le bloc, s'il existe, ou zero-long. 

New Handle permet de creer des blocs de toutes tallies, y compris un bloc vide. 
Dans ce cas, le bloc doit etre imperativement relogeable et non verrouille, et le 
pointeur maitre assoeie contiendra zero-long. 



Reallocation et desa I location de blocs memoire 

• L'application peut purger un bloc dont elle n'a plus besoin, grace a la procedure 
PurgeHandle. Un seul argument, le handle sur le bloc a purger. Quand le bloc est 
purge, il n'est plus accessible par ['application, mais le handle reste disponible et le 
pointeur maitre assoeie contient zero-long, 

Remarque Le bloc est purge si les deux conditions suivantes sont realisees : il doit 
avoir £te declare purgeable et il ne doit pas etre verrouille. Une autre procedure peut 
etre appelee, PurgeAU, pour purger tous les blocs purgeables (et non verrouilles) 
associes a une application. Un seul argument : I'identifiant de ['application. 

• Un handle disponible apres une purge peut etre realloug a un autre bloc, grace a 
la procedure ReaUocHandle (Figure II.6). Cinq arguments, le dernier etant le handle a 
utiliser, les quatre premiers etant similaires a ceux de la fonction NewHandle 

• Un handle disponible apres une purge peut etre restaure grace a la procedure 
RestoreHandle, qui admet comme seul argument le handle a reallouer. Le bloc aura la 
meme taille et les m ernes attributs que celui deja purge, mais pas forcement la meme 
localisation en memoire. C'est pourquoi cette procedure ne marche pas pour les blocs 
situ£s I une adresse fixe ou dans une banque fixe. 

• Pour purger un bloc de memoire et desallouer le handle qui lui est assoeie, on 
utilisera la procedure DisposeHandle. Un seul argument, le handle a desallouer. La 
procedure agit meme si le bloc n'a pas ete declare purgeable, meme s'il est verrouille. 
La procedure DisposAII desallouera tous les handles associes aux blocs que ['applica- 
tion a crees (il faut rappeler en argument I'identifiant de l'application. 
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avant 
PurgeHandle 



apres 
ReallocHandle 



Figart IJ.6. Fonrtlonnnnenl de ftirgtHuidk et keiillorlliindlr. 



Modification des attributs d'un bloc 

• Pour verrouiller un bloc, on doit uliliser la procedure HLock. Pour deverrouiller 
un bloc, on fait appei a la procedure HUnlock. Un seul argument dans chaque cas le 
handle sur le bloc a trailer. Tant que le bloc est verrouille, il possede une adresse fixe 
en memoire et ne peut etre purge. 

Hande thePict; f thePict est un handle sur une image 7 

ftecf r ; P un rectangle 7 

HLoek(thePict}; f on verrouille le Hoc avant de commencer a dessiner 7 

DrawPlcture(lhePict,&r); I* on dassine I'image (procedure QuickDraw) 7 
HUnloek(lhePict); f Cast fini, on peut deverrouiller le bloc 7 



On peut verrouiller d'un coup tous les blocs appartenant a une application grace a 
la procedure HLockAII, et les deverrouiller grace a la procedure HUnlockAU Un seu! 
argument dans les deux cas, 1'identifiant de ('application proprietaire des blocs. 

• Pour rendre un bloc purgeable ou non purgeable, la procedure SetPurge permet 
de fixer le niveau de purge du bloc : la valeurO signifie non purgeable, les valeurs 1 a 3 
signifient purgeable (3 etant un niveau de purgeabilite plus prioritaire que 1). Deux 
arguments : le niveau de purge {entier compris entre et 3, 1'application utilisant 
plutot une valeur comprise entre et 2) et le handle designant le bloc. 

En regie generate, une application preferera appeler DisposeHandle quand elle 
n'aura plus besoin d'un bloc, plutfit que SetPurge. Si par contre elle doit manipuler de 
nombreux blocs, elle peut fixer des niveaux de purge sur certains blocs qu'elle n'est 
pas en train d'utiliser. Si le Memory Manager a besoin de memoirt, il pourra les 
purger et 1'application devra les reallouer (ou !es restaurer) pour les utiliser de 
nouveau. 

Existe £galement la procedure SetPurgeAU, qui rend purgeables tous les blocs 
allouSs par ('application. Deux parametres : le niveau de purge et 1'identifiant de 
1'application... Nous voyons mal quelle application pourra se servir d'une telle 
routine. 
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Taille de blocs, espace mernoire 



• Pour connaitre la taille d'un bloc, on peut appeler la fonction GetHandleSize On 
passe en argument le handle replant le bloc, et elle retourne dans un entier long la 
taille du bloc en octets. 



• R6ciproquement, on peut changer la taille d'un bioe, grace a la procedure 
SetHandleSize. Deux arguments : la nouvelle taille (entier long) et le handle concerni. 
La taille d'un bloc peut etre riduite ou agrandie. En cas d'agrandissement, le Memory 
Manager fera la place n^cessaire si besoin est (compactage de m£moire, purge de 
blocs) et d^placera eventuellement le bloc dans ['operation (si celui-ci n'est pas 
verrouille, bien entendu). II est impossible de changer la taille d'un handle vide. 



• Pour forcer le compactage de la mdmoire, la procedure CompactMem peut etre 
utilisee. Aucun argument a passer, Compactage signihe deplacement de blocs 
relogeables vers le haut de la mSmoire, de maniere a cr£er le plus grand bloc libre 
possible. En aucun cas les blocs purgeables ne sont purges. 



• Pour connaitre la taille mernoire disponible a un moment donne, on peut appeler 
la fonction FreeMem, sans argument. Elle commence par effectuer un compactage, 
puis retourne dans un entier long le nombre d'octets disponibles. Ce nombre ne tient 
pas compte des blocs purgeables, puisqu'ils ne sont pas encore purges. A cause des 
problemes de fragmentation, il ne sera sans doute pas possible d'allouer un bloc de 
cette taille. Par contre, la fonction MaxBlock retourne dans un entier long la taille en 
octets du plus grand bloc libre en mernoire, avant tout compactage ou toute purge. 



• Pour connaitre la taille mernoire totale utilised par la machine, on appelle 
TotalMem, Cette fonction tiendra compte des 256 Ko presents sur la carte mere et de 
la mernoire additionnelle sur la carte d'extension. 



Copie d'un bloc 



II existe quatre procedures permettant de copier un bloc de memoirs . qui different 
esse ntie Heme nt par la maniere dont est passfee l'adresse du bloc a copier. Chacune des 
quatre procedures admet trois arguments (tous sur 32 bits) ; un repere pour ie bloc 
source, un repere pour le bloc destination et un nombre d'octets (taille du bloc a 
copier). Les procedures liront le contenu des n octets designed a partir de l'adresse 
source, et les r£6criront a partir de l'adresse destination, sans aucun controle de 
vraisemblance, en taasant ce qui pourrait prec#demment se trduver la. Le travail sera 
effectufi meme si la source et la destination se chevauchent, meme si ces zones 
traversent des frontieres de banques. 



• PtrToHand : la source est reperee par une adresse, la destination par un handle 
(Figure II-7). Le handle doit exister au moment de 1'appel, il est de la responsabilite 
de ['application de le creer. La logique voudrait que le bloc al)ou£ possede une taille 
supexieure ou egale au nombre d'octets k transferer. La source n'est pas n6cessaire- 
ment un bloc. 
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Figure 11.T. £t*t memoire »v«nl *t ipfts PtrToHand. 

• HandToPtr : la source est reperee par un handle, la destination par une adresse 
(Figure 1 1. 8). Le handle doit evidemment exister. Tout ce qui existait a partir de 
1'adresse de destination est ecrase. La destination n'est pas necessairement un bloc. 
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Figure 11.8. Etat nrfmolrt ivanl et ipres HindToPtr, 

• MandToiiand : la source est reperee par un handle, la destination par un handle 
(Figure II. 9). Les deux handles doivent exister au moment de l'appel. La logique 
voudrait que le bloc destination alloue possede une taille sup£rieure ou egale au 
nombre d'octets a transferer. 
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figure 11.9. EU1 mtmoirt avail! tt aprts HandToHand. 

• BlockMove : la source est reperee par un pointeur, la destination par un pointeur 
(Figure 11.10). Cette procedure assure la copie « sauvage » d'un nombre d'octets 
determines d'un endroit a un autre de la m^moire. Ni la source ni la destination ne 
sont n^cessairement des blocs. 



I pointeur I fr 




Figure 11.10. Elsi mernoirt avant el apres BlockMove. 



Exemple : obtention de handles 

Dans le chapitre consacr^ a QuickDraw, nous allons souvent parler de handle 
pointant sur une police de caracteres ou sur une image. Cet exemple partiel a pour but 
de montrer comment obtenir un handle sur un objet stocks sur disque. Nous 
n'insisterons pas sur les fonctions permettant la manipulation de fichiers, car dies sont 
propres a 1'environnement de travail utilise. Consultez plutdt votre documentation. 

On commence par creer le handle sur I'objet a rep£rer, qui sera relogeable. La 
taille du bloc repe^e' par le handle doit correspondre au nombre d'octets a lire (done a 
la taille du fichier), les attributs de ce bloc seront fixis de telle sorte qu'ils ne 
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chevauchent pas deux banques de memoire (ceei impose une taille interieure a 
64 Ko). Eventuellement, le bloc sera cree de taille quelconque, et celle-ci sera fixee 
des qu'elle sera connue. 

Ensuite, le handle est verrouill£ et dereference. Nous obtenons done un pointeur 
qui donne une adresse a partir de laquelle nous devons stocker les donn£es lues sur le 
disque, Une fois la lecture terminee, le handle est d£verrouille et repSre la police de 
caracteres ou I'image charged en memoire. 

Exemple d'une image ecran. Une telle image fait forcement 32 Ko, ce pourrait etre 
le risultat d'une sauvegarde particuliere issue de GS Paint. Notons que cet exemple 
est repris de maniere concrete a la fin du chapitre V consacrfi au Window Manager. 

Handle hdl: I* le handle a cr^er 7 

int my ID; r identifiant de I'application */ 

int valid: A /* indicateur de validity du chargement 7 

main() 
( 

f d6butde I'application "I 
hdl = NewHandle(0x8O00L, mylD, 0x001 0. 0L); f allocation d'un bloc de 32K 7 

valid - Load(hdl, VmonDisque/monSousFlep/monDessin"); f chargement des donn^es V 
if (valid) ... I* on agit en fonction de la validite du chargement 7 

T fin de ['application */ 
} 

Load{PicDest, path) 
Handle PicDest; f handle (deja cree) sur les donnees */ 

Pointer path; r chemin d'accfis aux donn^es sur disque 7 

{ 

int id: r identifiant fichier */ 

int count; /* nombre d'octeK lus 7 

int good ■ TRUE ; /* indicateur d'erreur 7 

HLoek{ PicDest); r le bloc est verrouillS 7 

id ■ open(path, 0); f ie fichier est otivert., . 7 

count - read(id, 'PicDest, OxEOOO); P ...et lu (ramarquer le d^reJerencement) 7 

if(count != 0x8000) good - FALSE ; f a-t-on lu le ben nonibre d'octets? */ 

close(id): f le fichier est femi4 7 

HUnlock(PicDest); /" le bloc est deverrouillc 7 
return good; 
} 

L'application devra faire toutes les verifications n£cessaires pour s'assurer que le 
fichier a £t£ lu correctement, sous peine de planter plus tard, a l'utilisation du handle, 
sans raison apparente ! 

Note Nous verrons dans le chapitre X une section consacree au Font Manager, qui 
montre qu'on n'a vraiment pas besoin de se fatiguer a aller chercher des handles sur 
polices de caracteres ! 



Codes d'erreur 

La plupart des routines du Memory Manager sont susceptibles de retourner un 
code erreur, qu'on pourra r£cup£rer dans la variable .errno (au moins dans les 
environnements Megamax). Le tableau suivant donne le code erreur, un libell£ 
pouvant etre defini pour le designer et une explication. Comme d'habitude, signifie 
pas d'erreur. 

$201 MemErr Impossible d'allouer le bloc : erreur typique pour NewHan- 

dle s'il n'y a pas assez de memoire utile, malgre' tous les 
efforts du Memory Manager. 
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$202 EmplyErr 
$203 NotEmptyErr 
$204 LockErr 



$205 PurgeErr 
$206 HandleErr 



$207 IDErr 
$208 AtlrEn 



Operation illegale sur uti handle vide : tentative d'utilisa- 

tion d'un handle qui a ete purge auparavant. 

Un handle vide etait attendu pour cette operation : on a 

essaye de reallouer ou de restaurer un handle non vide. 

Operation illegale sur un bloc verrouille ou non relogeable : 

certaines operations du Memory Manager ne sont valides 

que sur )es blocs pouvant changer d'adresse. 

Tentative de purge d'un bloc non purgeable. 

Un handle invalide a €\i passe en argument : pour une 

raison quelconque, le Memory Manager ne reconnait pas un 

de ses blocs. 

Un identifiant d' application invalide a €t€ donne. 

L'operation sur le bloc est incompatible avec ses attributs : 

on ne peut pas, par exemple, restaurer un handle sur bloc 

fixe (on peut par contre le reallouer). 



SEGMENT LOADER 

Pour offrir le maximum de liberie aux programmes tournant sur 1' Apple IIGS, le 
systeme d' exploitation de cette machine a ete dote d'un outil capable de gerer les 
segments de programmes et de donnees, Un programme n'a plus a etre charge 
completement en memoire pour pouvoir tourner. Un grand programme pourra etre 
fractionne en segments, ces segments pourront etre charges n'importe oil en memoire, 
et ce de maniere automatique par le Segment Loader. Additionnellement, Tapplica- 
tion pourra elle-mime gerer ses segments, les charger en memoire ou les purger de la 
memoire a son instigation. 

II existe deux sortes de segments : les segments statiques, charges en memoire au 
debut du programme et qui doivent y rester jusqu'a la fin, et les segments dynamiques, 
charges au fur et a mesure des besoins, purges par le Memory Manager quand ils ne 
sont plus references, 

Le Segment Loader et le Memory Manager travaillent en etroite collaboration. 
C'est le Segment Leader qui detecte les segments a charger ou a decharger, et le 
Memory Manager qui execute le travail. 

Nous n'entrerons pas plus dans les details : la majorite des petites applications 
laisseront faire le compilateur, qui se chargera de creer des segments, et le linker, qui 
generera les informations necessaires au Segment Loader pour que celui-ci puisse s'y 
retrouver. 



CHAPITRE III 



QUICKDRAW 



L'interface utilisateur Apple telle qu'elle a €t£ popularisee par le Macintosh repose 
en grande partie sur un ecran tout graphique de tres haute definition (fini les modes 
texte, basse resolution, mixte, etc.), L' Apple IIGS reprenant tous les principes de 
['interface Macintosh, il est normal de retrouver le puissant gestionnaire qui en est Tun 
des piliers : QuickDraw. 



En mode emulation, l" Apple IIGS connait les anciens modes de la famille Apple 
(texte 40 et 80 colonnes, basse resolution, haute resolution et double haute 
resolution). Ces modes-la, nous les oublions definitivement pour utiliser exclusive- 
mem le tout-graphique g£r£ par QuickDraw, materialist par deux nouveaux modes 
appeles super haute resolution (ou super hi-res) ; 

- 200 lignes de 640 points en 4 couleurs par ligne ; 

- 200 lignes de 320 points en 16 couleurs par ligne. 



Dans ces deux modes super haute resolution, tout ce qui apparait a I'ecran est ger£ 
par QuickDraw : un dessin, du texte, un menu d£roul£, une fenetre... Tous les 
gestionnaires devant afficher quelque chose a l'6cran (Menu Manager, Window 
Manager, Control Manager, Line Edit, etc.) appellent QuickDraw de maniere 
interne. Une application appellera explicitement QuickDraw pour definir le contenu 
d'une fenetre qu'elle gere, a moins qu'elle n'utilise un gestionnaire qui le fera a sa 
place. Cas typique : QuickDraw est appele par le Window Manager pour dessiner une 
fenetre, et par ['application directement pour dessiner le contenu de cette fenetre. 

Gardons a 1'esprit que tout est dessin en mode super hires : quand du texte est 
affiche, ce texte est dessine" et peut subir des deformations. C'est grace a cette 
propriety que l'utilisateur pourra visualiser des jeux de caracteres diff£rents, ou styles 
differents (gras, italique, souligne\ ...), a 1'interieur d'un jeu de caracteres, 

Ce chapitre est divise en trois grandes parties : la premiere decrit quelques 
elements matenels, la deuxieme traite des concepts QuickDraw, Ja troisieme des 
outils qui permettem* r£ellement de dessiner. 
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ELEMENTS MATERIELS LIES AU GRAPHISME 



SCB : scan line control byte 

Sur 1'Apple IIGS, la memoire ecran occupe les 32 Ko allant de $2000 a S9FFF sur 
la banque $E1. Cette memoire Scran est composes de deux parties : 32 000 octets 
servant a representer les 200 lignes de pixels que peut afficher I'ecran (une ligne 
occupe toujours 160 octets), et 768 octets d'informations diverses (dont 512 octets 
pour stacker 16 tables de couleurs, a partir de I'adresse S9E00). Chaque ligne est 
caractensee par une information appelSe SCB {scan line control byte), stockee sur un 
octet (ce qui prend done 200 octets). 

Structure du SCB : 

- bits a 3 : numero d'une palette de couleurs (de a 15) ; 

- bit 4 : reserve ; 

- bit 5 : mode remplissage (0 = OFF, 1 = ON) ; 

- bit 6 : interruption (0 = OFF, 1 = ON) ; 

- bit 7 : mode (0 = 320 pixels par ligne, 1 = 640 pixels par ligne). 

• Une palette de couleurs est comme son nom 1'indique une table definissant les 
couleurs disponibles sur une ligne. Chaque table contient 16 entrees. Chaque couleur 
etant codee sur deux octets, une palette de couleurs occupe done 32 octets. 
Remarque Les 16 tables de couleurs differentes peuvent etre utilisees sintultan£ment, 
puisque chaque ligne peut se reterer a un SCB different. On peut done atteindre la 
visualisation simultanee de 256 couleurs. 
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Hliure lit. I. U mode J20. 

Sur une ligne en mode 320, un pixel occupe 4 bits et leur representation numerique 
correspond a une couleur dans la table couleurs. On peut done avoir jusqu'a 
16 couleurs par ligne dans ce mode, chaque pixel pouvant acc6der a chaque couleur. 
Dans un octet, le premier pixel occupe la partie haute et le deuxieme pixel la partie 
basse, ce qui est un ordre nature 1 : premier pixel a gauche, deuxieme pixel k droite, 

Sur une ligne en mode 640, un pixel occupe 2 bits. Les quatre pixels d'un octet 
suivent une disposition naturelle : premier pixel dans les bits 7 et 6, deuxieme dans les 
bits 5 et 4, troisieme dans les bits 3 et 2, quatrieme dans les bits 1 et 0. Leur 
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representation numerique correspond & une couleur dans un sous-ensemble de la 
palette utilisee : le premier pixel accede aux couleurs 8 a 1 1 , le deuxieme aux couleurs 
12 ;i 15, le troisieme aux couleurs a 3, le quatrieme aux couleurs 4 a 7. De sorte que 
Ton peut toujours avoir 16 couleurs par ligne, mais les couleurs ne sont plus librement 
accessibles : il y a une contrainte eittre la couleur et la position du pixel dans la ligne. 
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Figure [11.2. Le mode MO, 



Codage des couleurs : deux octets. Description 
- bits a 3 : niveau de bleu {0 a 15) ; 
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Figure 1 1 1. 3, Tables de couleurs. 
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Les 16 niveau* de rouge, de vert et de bleu definissent 4 096 couleurs au 
maximum. Notons que 1'absence des trois couleurs primaires se traduit par le noir 
(couleur $000} et que le melange maximal des trois couleurs primaires se traduit par le 
blanc (couleur IFFF). Entre ces deux extremes, les differents gris sont obtenus par des 
niveaux egaux des trois couleurs elementaires ($111, $222, ..., IEEE). 

• Le mode remplissage autorise une alternative au codage des pixels vu precedem- 
ment. Si ce mode est actif, la couleur de la table devient inaccessible, et un pixel dont 
la valeur est a zero sera affiche avec la meme couleur que le pixel pr£c£demment 
affiche. 

Exemple Si les pixels d'une ligne prennent les valeurs : 

10002000010 

et si 1 signifie noir, 2 signifie blanc, la ligne sera vue avec les couleurs : 

NNNNBBBBBNNN 

Note Cette technique n'ayant aucun sens dans un environnement multifenetres 
(elle sen au remplissage des lignes), QuickDraw ne propose aucun outil pour I'utiliser, 
Elle est limitee au mode 320. 

• Les interruptions peuvent etre utilisfies pour synchroniser Taction de dessiner 
avec le rafraichissement de 1'ecran (chaque pixel est redessine" tous les soixantiemes de 
seconde quand le systeme tourne a 60 hertz), ou encore pour changer les tables de 
couleurs avant qu'un ecran soil entierement dessine\ ce qui permet de montrer plus de 
256 couleurs a la fois... a condition de gerer lesdites interruptions. 

• La resolution (320 ou 640 points par ligne) peut etre fixee ind^pendamment pour 
chaque ligne. Cependant, on se gardera bien d'utiliser cette possibility de resolution 
mixte en environnement multifenetres : les resultats pourraient s'av^rer surprenants. 



ROUTINES DE CONTROLE 
Initialisation de QuickDraw 

Comme chaque gestionnaire, QuickDraw doit etre initialise avant 1'utilisation 
d'une quelconque de ses routines. C'est la procedure QDStarlUp qui se charge du 
travail : 

int zeropg; t pre mid re page zero utilises par QuickDraw 7 

int masterSCB: r scan line control byte maitre V 

int max Width; r largeur de la plus grande pixel map utilises */ 

int my ID; f identifiant de ('application */ 

QDStBrtUp (zeropg, masterSCB, maxWidth, mylD); f initialisation de QuickDraw *j 



QuickDraw utilise trois pages consecutives dans la banque zero pour y stocker les 
renseignements qu'il gere de maniere interne : zeropg sera 1'adresse de la premiere. 

masterSCB definit les caracteristiques de ['environnement, entre'autres la table de 
couleurs a utiliser et le mode 320 ou 640. Cette valeur est notamment utilisee pour 
1'initialisation de ports graphiques. Deux valeurs seront gene>alement utilisees : $0000 
pour designer un SCB en mode 320 et $0080 pour designer un SCB en mode 640 (dans 
les deux cas, la table de couleurs numero est retenue, le mode remplissage est OFF, 
ainsi que les interruptions). 

maxWidth est un nombre qui indique la largeur en octets de la plus targe des pixels 
maps qui seront dessinees par I'appltcation (ou zero pour designer la largeur de 
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1'ecran). Ceci permet a QuickDraw d'optimiser l'allocation de certains buffers 
internes. 

tnylD est le parametre retourne par la fonction MMStartUp du Memory Manager 
(voir ce chapitre). 



Routines gerant les SCB 

Ces routines peuvent itre d'une utilisation pirilleuse, et me"ritent d'etre teste~es et 
approfondies avant d'etre employees a tort et a travers. 

• La machine possede un SCB standard : il est retourne par la fonction GetStan- 
dardSCB Da les caracteristiques suivantes : la table de couleurs est la table zero, le 
mode remplissage est inactif, les interruptions sont inhibees et le mode retenu est le 
mode 320. En d'autres termes, tous les bits composant le SCB {sauf peut-etre le bit 4, 
sans signification) sont a zero. 

• Le SCB maitre peut dtre retrouve (il est retourne par la fonction GetMasterSCB) 
ou modifi£ (par la procedure SetMasierSCB). Ces appels seront rarement utilises, 
mais a supposer qu'une application doive jongler avec un ecran en mode 320 et un 
ecran en mode 640, par exemple, il faut bien pouvoir initialiser les ports correspon- 
dants ! 

• Nous avons dit que chaque ligne pouvait avoir son propre SCB. Au moment de 
l'initialisation du port, le SCB maitre est affects' a toutes les lignes. Ensuite, 
I'application peut le modifier pour chaque ligne, grace a la procedure SetSCB, qui 
admet deux arguments : le numero de la ligne ecran concerned (0 a 199) et le SCB a lui 
fixer, L'effet a 1'ecran est immediat. Sauf a vouloir crier des effets non maltrisSs, on se 
gardera d'utiliser cette possibility en environnement multifenetres. Par contre, c'est le 
seul moyen pour presenter plus de seize couleurs a la fois sur 1'ecran, dans des 
utilisations graphiques particulieres. 

• En complement de la routine precidente, la fonction GetSCB retoumera le SCB 
de la ligne Scran dont le num£ro est pass£ en argument. 

• Pour remettre d'un coup un SCB identique a toutes les lignes ecran, on utilisera 
SetAMSCBs (on passe en argument la valeur du SCB a fixer). La encore, l'effet est 
immediat. 



Routines gerant les tables de couleurs 

• Tout comme il existe un SCB standard, QuickDraw conserve en mimoire une 
table des couleurs standard, qui est la table utilise par defaut a l'initialisation. Pour 
recuperer les valeurs stockies dans cette table, on se reserve un peu de place en 
mimoire (32 octets exactement) et on passe l'adresse de cette mimoire r£servee a la 
procedure InitCotorTable qui se charge de la remplir. Voici ce que Ton obtient, en 
fonction du SCB maitre : 





MODE 320 






MODE 640 




Entrfie 


Couleur 


Code 


Entree. 


Couleur 


Code 





Noir 


$000 





Noir 


$000 


1 


Gris fonce 


$777 


1 


Rouge 


SFOO 


2 


Brun 


$841 


2 


Vert 


$OF0 


3 


Pourpre 


$72C 


3 


Blanc 


$FFF 


4 


Bleu 


$O0F 


4 


Noir 


$000 


5 


Vert fonce" 


$080 


5 


Bleu 


$0OF 


6 


Orange 


$F70 


6 


Jaune 


$FF0 


7 


Rouge 


$D0O 


7 


Blanc 


$FFF 


8 


Chair 


$FA9 


8 


Noir 


$000 


9 


Jaune 


$FF0 


9 


Rouge 


$FO0 


10 


Vert 


$0E0 


10 


Vert 


$0F0 


11 


Bleu clair 


$4DF 


11 


Blanc 


$FFF 
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12 


Lilas 


$DAF 


12 


Noir 


$000 


13 


Bleu pervenche 


S78F 


13 


Bleu 


SO0F 


14 


Gris clair 


sccc 


14 


Jaune 


SFFO 


15 


Blanc 


SFFF 


15 


Blanc 


SFFF 



Note Ces palettes de couleurs n'ont pas 6l6 choisies au hasard par Apple. Four le 
mode 640, on constate que le noir et le blanc figurent dans les quatre quarts de la 
palette, ils seront done accessibles quelle que soit la position du pixel. Par centre, on 
ne pourra avoir deux pixels consecutifs de meme couleur parmi le rouge, le vert, le 
bleu et le jaune. Mais si Ton considere deux pixels consecutifs corarae « associ^s », on 
retrouve 16 pseudo-couleurs : noir-rouge, noir-vert, noir-bleu, noir-jaune, blanc- 
rouge, blanc-vert, blanc-bleu, blanc-jaune, rouge-bleu, rouge-jaune, vert-bleu, vert- 
jaune, noir-noir, blanc-blanc, noir-blane, bianc-nolr. Ce qui permet de donner 
l'illusion qu'on est en mode 640 pour tout ce qui est noir ou blanc (les textes sont done 
impeccables), et en mode 320 pour tout ce qui est couleur (avec 16 pseudo-couleurs). 

* Puisque nous pouvons gerer jusqu'a seize tables de couleurs, QuickDraw nous 
offre deux procedures, GetColorTable pour connaitre le contenu d'une table, 
SetColorTable pour remplir une table. Dans les deux cas, nous utilisons en argument : 
d'abord le numero de la table (compris entre et 15), ensuite I'adresse de la zone de 
stockage du contenu (32 octets). 

Exemple Mise en place de trois tables de couleurs (mode 320). 

int table0[16); 

in! tablel [16] • (0, 0x888, 0x9S2, 0x83D, 0x1 1 F, 0x191 , 0xF81 , 0xE1 1 , 

OxFBA. 0xFF1, 0x1 F1, OxSEF, OxEBF. 0xB9F, OxDDD, OxFFF); 
int table2I16] - {0, 0x666, 0x730. 0x61 B, OxE. 0x70. 0xE60, OxCOO, 

0xE98, OxEEO. OxDO, 0x3C£, 0xC9E, 0x67E, OxBBB, OxFFF): 

lnltCo)orTab!e(tableO); I* retourne les couleurs standard ' 

SetCoIorTabtefO, tableO); 
SetColorTabJe(1, tablel) 
SetColorTable(2, table2) 



r mise en place de la table standard */ 
T mise en place de la table numero 1 */ 
r mise en place de la table numero 2 */ 



Remarque Les deux tables de l'exemple presentent la particularite suivante : 

- chaque couleur de la table 2 se d£duit de la couleur correspondante de la table 
par la baisse d'une unite (quand e'est possible) de Tintensitd de chaque couleur 
elementaire, le blanc etant epargne\ Ainsi $777 dans la table devient $666 dans la 
table 2. Cette astuce permet d'avoir deux palettes de couleurs dont I'une est 
1'assombrissement de 1'autre. 

- chaque couleur de la table 1 se dSduit de la couleur correspondante de la table 
par la hausse d'une unite" (quand e'est possible) de 1'intensite de chaque couleur 
elementaire, le noir etant epargne. Ainsi $777 dans la table devient $888 dans la 
table 1. Cette astuce permet d'avoir deux palettes de couleurs dont I'une est 
I'eclaircissement de 1'autre. 

Nous allons voir tout de suite (point suivant) une maniere plus elegante (et plus 
automatique) de faire la meme chose, Pourquoi preserver les couleurs blanches et 
noires ? Tout simplement pour ne pas affecter la couleur des objets « systeme » (texte 
des menus, encadrement des fenetres, boutons, etc.) quand la nouvelle table sera 
utilis£e. 

Mais auparavant, constatons qu'il est tres facile de copier le contenu d'une table 
dans une autre table. 
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Exemple Recopie de la table 6 dans la table 7. 
cbar tampon[32J; /* reserve 32 octets de memoire tampon */ 

GetColorTable(6, tampon}; T remplit la zone tampon */ 

SetColorTable(7, tampon); /* utilise la zone tampon 7 

Remarque Dans I'exemple precedent, nous, avions declare' la table comme etant 
composee de 16 Elements et de 2 octets (int table0[16)) et id comme 6tant composee 
de 32 elements d'un octet (char tampon[32]). Ces deux declarations sont evidemment 
£quivalentes, la premiere etant absolument obligatoire si on doit acc£der k une 
couleur directement. 

• QuickDraw nous permet enfin d'acceder directement ik une couleur dans une 
table determinee. La fonction GetColorEntry permet de connaitre une couleur 
particuliere d'une table, la procedure SetColorEntry de fixer une couleur dans une 
table. Nous allons utiliser ces routines pour assombrir ou eclaircir de maniere 
automatique la table des couleurs standard. C'est plus long a ecrire, mais c'est plus 
61£gant, et d'utilisation g£n£rale. 

int couleur; I* sera la couleur manipulee 7 

int i; 

for (i=1 ; i<15; ++i) t i varie de 1 a 14: le noir et le blanc sont preserves 7 

{ 

couleur ■ GetColorEntry(0. i); f on va chercher la couleur i de la table 7 
if ((couleur & OxOFOO) l« OxOFOO) couleur += 0x0100; T niveau de rouge augments 7 
if ((couleur & OxQOFO) != OxOQFO) couleur +» 0x001 0; f niveau de vert augments 7 
if ((couleur & OxOOOF) != OxOOOF) couleur += 0x0001 ; r niveau de bleu augmente 7 
SetColorEntry(1 , i, couleur); f slocke la couleur modifies dans la table 1 entree i 7 
} 

for(i=1; ic15; ++i) (* i varie de 1 a 14; le noir et le blanc sont preserves 7 

{ 

couleur - GetColorEntry(u, i); T on va chercher la couleur i de la table */ 
if ((couleur | OxFOFF) l= OxFOFF) couleur -= 0x0100; f niveau de rouge diminue */ 
if ((coubur | OxFFOF) != OxFFOF) couleur — . 0x0010; f niveau de vert diminue 7 
if ((couleur j OxFFFO) != OxFFFO) couleur -«■ 0x0001 ; /* niveau de bleu diminue 7 
SetColorEntry (2, i. couleur); f stocks la couleur modified dans la table 2, entree i 7 
) 

II ne reste plus qu'i utiliser ces tables, pour cr£er des effets speciaux. Le dessin 
original sera eclairci ou assombri uniquement par le jeu des tables de couleurs. 

int scb; r sera le code du SCB courant 7 

scb =0; r SCB standard, mode 320, palette de couleurs n° 7 

SetAIISCBs(scb); C toutes les lignes sont au standard 7 

T dessin dans ce mode 7 
SetAIISCBs(scb+1 ); f passage instantane a la palette 1 ; eclaircissement */ 

f temporisation (voir chapitre IV} 7 
SetAIISCBsfscb); f retour instantane 4 la palette 0; assombrissement */ 

T temporisation 'I 
SetAIISCBs(scb+2); /* passage instantane & la palette 2: assombrissement 7 

r temporisation 7 
SetAIISCBs(scb); r retour instantane a la palette 0; eclaircissement 7 

Les tables de couleurs recelent des proprietes qui seront d£couvertes au fur et a 
mesure de ('utilisation de QuickDraw. Un ouvrage entier pourrait etre consacre a ce 
gestionnaire aux richesses insouptjonnables, ce qui n'est pas notre propos... II sera par 
exemple tres facile de faire apparaitre ou disparaitre un objet, rien qu'en jouant avec 
les tables de couleurs. 
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CONCEPTS QUICKDRAW 

QuickDraw est constitu6 d'un ensemble de routines permettant de manipuler dans 
un environnement graphique qui lui est propre un certain nombre d'objets pr6deTmis. 
Le but de cette partie consiste a decouvrir quel est cet environnement graphique et 
quels sont ces objets. 



FONDATIONS MATHEMATIQUES 



Si 



r 



la grille de coordonnees 



7 



I 



un point 



le pixel 

eorrespondant 



Figure 111 .4. Concepts de base dc QuickDraw. 



Plan de coordonnees 

On peut 1'assimiler a une grille bi-dimensionnelle formee d'un nombre fini de 
lignes infiniment fines. La grille est de dimension finie, les coordonnees £tant de'finies 
comme des nombres entiers compris entre — 16384 et + 16383. L'axe des abscisses est 
classiquement oriente de la gauche vers la droite, l'axe des ordonnees moins 
classiquement du haul vers le bas. Cette orientation non mathSmatique suit pourtant 
une ligne logique implacable : nous ecrivons de gauche a droite et de haul en bas. Les 
lignes composant la grille sont infiniment fines, ce qui signifie qu'elles n'ont aucune 
existence physique : elles ne servent qu'S definir un systeme de coordonnees. 



Point 

Chaque intersection des lignes de la grille d6finit un point. Puisque les lignes sont 
infiniment fines, le point est infiniment petit, egalement sans existence physique. Le 
plan de coordonnees contient ainsi plus d'un milliard de points, 1'origine (0,0) se 
trouvant en plein milieu de la grille. Le coin sup^rieur gauche de I'ecran correspond I 
cette origine. 
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Ligne 

Deux points quelconques dSfinissent une ligne (en rSalitS un segment de droite). 
La ligne est constitute de points, et du fait que le nombre des points est fini, ceux-ci ne 
sont pas forcement rigoureusement alignes. 



Rectangle 



Deux points quelconques peuvent dSfinir un rectangle : 1'un Slant le haut-gauche 
du rectangle, 1'autre le bas-droit (condition : les cote's du rectangle doivent etre 
horizontaux et verticaux). Le rectangle, comme la ligne, n'est qu'un concept 
mathematique, puisque les cotes qui le delimitent sont infiniment fins. Un rectangle 
de taille n x m englobe exactement (n-1) x (m— 1) pixels. 

Le rectangle est un objet essentiel de la philosophie QuickDraw, comme nous le 
verrons tout au long de ce chapitre : il servira notamment a delimiter des regions 
complexes. 



Rectangle arrondi 



Pour dSfinir un rectangle arrondi, il suffit d'ajouter k la definition d'un rectangle 
normal deux rayons de courbure : un rayon de courbure horizontal et un rayon de 
courbure vertical. QuickDraw saura gerer de teis objets. 



Ellipse (ou ovale) 



Une ellipse est parfaitement definie par le rectangle circonscrit (on determine 
immSdiatement le demi petit axe et le demi grand axe). Un rectangle lui Stant donnS, 
QuickDraw se dSbrouillera tout seul. 

Remarque Pour obtenir un cercle parfait, il suffit que le rectangle circonscrit soit un 
carre. 



Arc 

Si pour une ellipse donnee nous determinons un angle d'origine et un angle d'arc, 
nous obtenons une part de camembert chere aux graphiques de gestion. QuickDraw 
salt manipuler les parts du camembert. 



Region 



Le concept de region est sans doute le concept le plus puissant de QuickDraw. Une 
region, c'est un ensemble quelconque de points d^finissant une structure coherente. 
Elle pent etre concave ou convexe, connexe ou disjointe, pleine ou Svidee... 
QuickDraw offre les outils pour creer et manipuler les regions, et ce avec des temps de 
reponse suffisamment performants pour que le concept presente un quelconque 
interet. Nous verrons ces outils et leur utilisation concrete. Une facon d'imaginer une 
region, c'est de prendre le plus petit rectangle qui 1'englobe, et de dSfinir a l'inteneur 
deux sortes de points : ceux qui appartiennent k la region, et ceux qui lui sont 
Strangers. Nous avons parld de points et non de pixels ; la region est un concept 
mathematique. 
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Figure III. 5. Concepts ^eornetriques.. 



Polygone 

Un polygone est defini par un ensemble de points dont l'ordre est primordial (le 
demier point coincidant avec le premier) : les lignes qui rejoignent deux points 
consecutifs separent le plan en deux : les points qui sont interieurs au polygone et ceux 
qui lui sont exteneurs. Les lignes pouvant se croiser, la distinction n'est pas toujours 
evidente a faire. QuickDraw, lui, ne se trompera pas. 



ENTITES GRAPHIQUES 



Pixel 

Chaque point (infiniment petit) definit un pixel qui, lui, a une reality physique. Un 
pixel est eonstitue de la surface comprise entre deux lignes horizontal et verticale 
consecutives, ses coordonnees etant fix^es par le point situS a son angle superieur 
gauche. Un pixel possede une couleur. La technologie bitmap voulant que chaque 
point soil adressable individuellement, a un pixel correspond de maniere tres precise 
un certain nombre de bits en memoire. 2 bits permettent de d^finir 4 couleurs, done 
un pixel sera constitui de 2 bits dans le mode 640 x 200. De mSme, 4 bits permettent 
de definir 16 couleurs, done un pixel sera constitud de 4 bits dans le mode 320 x 200. 
Dans les deux cas, une ligne d'ecran aura la meme taille ; 160 octets {sur Macintosh, 
l'eeran monochrome ne permet que 2 couleurs, le noir et le blanc : dans ce cas tres 
particulier, un pixel equivaut a un bit). 
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Pixel map 

Une pixel map est une portion de memoire contenant une image graphique 
composee de pixels, chaque pixel ayant la meme taille (2 ou 4 bits). QuickDraw sail 
dessiner n'importe oil, et pas senlement dans la memoire ecran. 1! suffit de lui dire oil 
dessiner. Le fait de dessiner ne consiste reellement qu'en la modification de pixels au 
sein dune pixel map, et la memoire ecran n'est qu'une pixel map particuliere, situee k 
une adresse fixe en memoire. 

Une Vendue de memoire represente quelque chose de lineaire : tous les pixels sont 
mis bout a bout. Dans la realite, un dessin est un objet a deux dimensions. Le passage 
entre une pixel map et sa representation plane s'effectue par I'apport d'eWments 
supplementaires, stockes dans une structure dediee appelee Loclnfo, 

Definition de Loclnfo : 



struct _Loclnfo ( 
int PortSCB : 
Pointer baseAddr ; 
int rowBytes ; 

Rect BoundsRsct ; 

]; 

#define Loclnfo struct Loclnfo 



r SCB pour la pixel map (dans I'octet bas) */ 
r pointeur sur la pixel map */ 
r largeur de 11 mage, en octets V 
r rectangle pour la pixel map "/ 



PortSCB designs pour la pixel map a la fois la palette de couleurs utilisee et la taille 
de chaque pixel (en fonction de la resolution annoncee). baseAddr designe 1'adresse 
oil debute la pixel map en memoire. rowBytes designe le nombre d'octets contenus 
dans chaque ligne de pixels (ce nombre doit obligatoirement etre un multiple de 8). 
Enfin, BoundsRect est un rectangle qui determine I'etendue exaete de la pixel map el 
qui lui impose un systeme de coordonnees, dites globales. 
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lit. ft. La structure Loclnfo. 
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Figure 111.7. Pattern et masque. 



Patterns et masques 



Un pattern est une pixel map carree composee de 8 x 8 pixels, utilises comme 
motif de remplissage {« couleur » des objets, d'un fond ecran) ou comme encre 
(« couleur » du crayon). Les motifs r6petes sont dessines de telle maniere qu'ils se 
raccordent parfaitement, formant ainsi une trame parfaite. Les couleurs sont des 
patterns un peu particulters, dits patterns solides (tous les pixels du pattern sont de la 
mgme couleur). 



Un masque de dessin est un carrS de 8 x 8 bits utilisd pour masquer le pattern 
selectionrte' : chaque 1 du masque laissera passer le pixel associe du pattern, chaque 
empechera le pixel de passer (c'est-a-dire que seuls les pixels du pattern assoctes a un 1 
dans le masque seront dessines, les autres restant de la couleur du fond). 
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Bounds Red pour la pixel map: dafinit las coordonnees gbbales 
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FortRect du GrafPort: 
def. coord, locales 
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Figure II [J. Les rtgloni du grufpurt. 



Grafport 

Pour dessiner, il est necessaire de delinir un environ nement graphique. Le grafport 
est une structure qui d6finit completement un tel environnement. 

Le grafport est compose d'un grand nombre d'elements, dont les plus importants 
sont : 

• Une pixel map avec ses donn6es addit Sonne! les permettant la representation du 
dessin dans un plan (autrement dit une structure Loclnfo vue plus haut, appelons-la 
Portlnfo. Nous avons dit qu'un systeme de coordonnees £tait attach^ a une telle 
structure ; pour le grafport, il s'agit du systeme de coordonnies globules. 

• Un rectangle appelg PortRect qui d£signe une partie de la pixel map : c'est dans 
ce rectangle exclusivement que s'effectueront les operations graphiques. Ce rectangle 
impose un second systeme de coordonnees, appele systeme de coordonnies locales. 
Quand nous fitudierons le Window Manager, nous verrons que la partie « contenu » 
d'une fenetre n'est autre que la visualisation du contenu du PortRect associe" au 
grafport de la fenetre en question. (Voir !e chapitre XL) 

• Deux regions : la clip region et la region visible, qui limitent le champ 
d'application de certains outils de dessin. 

La clip region est une region (au sens QuickDraw) delimitant le lieu ou les outils de 
dessin agissent : il est impossible de dessiner un pixel en dehors de la clip region. 
Toute tentative de dessin en dehors de la clip region se soldera par une absence de 
r^sultat, L'exemple classique d'utilisation de cette region peut 6tre ici rapped : pour 
dessiner un demi-cercle, il suffit de dessiner un cercle entier, la moitie du carr£ 
d'accueil £tant clippee, 1'autre pas. 



La region visible est egalement une region au sens QuickDraw, delimitant le lieu 
ou le dessin est visible de celui oil i! ne Test pas. Pour revenir au concept de fenltres, il 
est possible qu'une d'entre elles cache partiellement le contenu d'une autre. On a la un 
exemple de restriction de la region visible. 
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Ces deux concepts ne doivent pas 6tre confondus : quand une application voudra 
restreindre le champ de son dessin, elle modifiera la clip region, et non pas la region 
visible, 

D'ores et deja, nous pouvons faire une constatation : il n'est pas possible de 
dessiner n'importe oil (voir figure III. 8). On ne pent dessiner que dans un grafport, et 
dans 1'intersection de deux rectangles et de deux regions, il faut etre dans la region 
visible et dans la clip region, il faut etre dans le rectangle PortRect du grafport, mais 
aussi dans le rectangle frontiere qui delimite la pixel map (le BoundsRect du Portlnfo, 
pour parler en eharabia). 

• Un pattern de fond, dit bkPal (remplissage du PortRect a rinitialisation, 
efface ment de formes). 

• Un crayon possedant un certain nombre de caracteristiques : une localisation, 
une taille, un mode de transfert, un pattern et un masque. De plus, il peut etre visible 
ou invisible. 

• Une police de caracteres utilisee pour dessiner du texte, avec egalement un 
certain nombre de caracteristiques : une taille, un style, un mode de transfert, une 
couleur pour le corps des lettres (ForeCohr), une couleur pour le fond des lettres 
(BackCoIor). 

• Une zone d'utilisation Libre (4 octets) pour ['application, appelee UserField. 

• Plusieurs zones d'utilisation interne au systeme. 

II est inutile d'attacher une importance particuliere a la definition exacte du 
grafport en terme de structure : QuickDraw propose tout un jeu de sous-programmes 
permettant de modifier les caracteristiques du grafport courant, sans qu'il y ait a 
connaitre le moindre nom de champ de cette structure. II est meme fortement 
deconseilld de vouloir modifier directement le contenu de 1'un des champs : passer p;,r 
les routines adequates permet de s'affranchir des problemes de compatibility avec les 
versions ult^rieures de QuickDraw. Les caracteristiques interessantes du grafport et 
les routines permettant de les modifier sont decrites dans le present chapitre. 



Retenons simplement que dans Tenvironnement de travail du programmeur, sera 
sans doute defini un type nomine GrafPort et que, quand on declarera une variable de 
type GrafPort, l'espace necessaire pour stocker les caracteristiques de ce grafport 
(170 octets) sera automat iquement reserve. 



Curseur 



Le curseur est un objet graphique de dimension quelconque qui sert principale- 
ment a indiquer le lieu de I'ecran ou pointe la souris, et qui done suit fidelement tous 
ses d^placements. De maniere plus precise, e'est 1'un des pixels du curseur qui localise 
la position de la souris. Le point associe est appe!6 hotspot ou point chaud. 

Attention Le curseur est souvent appele 1 pointeur, car sa fonction est de designer 
l'endroit ou un clic souris peut intervenir. Ce terme de pointeur n'a rien a voir 
evidemment avec celui que nous employons sans arret en programmation. 
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La structure de type Cursor est une structure h taille variable, dont la definition 
pourratt etre la suivante : 



r hauteur du curseur, en pixels */ 

f largeur du curseur, en nombre de mots 7 

T image du curseur V 

r masque du curseur 7 

r ordonnee du point chaud 7 

f abscissa du point chaud 7 



struct _Cursor 


( 


int 
int 


CursorHeight ; 
CursorWidth ; 


char 
char 
int 
int 


Cursorlmage{ ][ ] 
CursorMask{ j[ ]; 
HotSpotY; 
HotSpotX, 



#define Cursor struct Cursor 



La hauteur du curseur est definie en nombre de pixels. Pas de problcme ici, c'est le 
nombre de lignes de l'image du curseur. Plus compliquee est la definition de la 
largeur : l'image est constitute d'un certain nombre de pixels en largeur, dont la taille 
depend du mode de resolution. De plus, chaque lignc doit etre terminee par un mot de 
deux octets a z£ro. La « largeur » du curseur est le nombre de mots necessaires pour 
deTmir une telle ligne. 

L'image du curseur est une pixel map classique, avec le dernier mot de chacune de 
ses lignes a zero. Le masque servira a combiner l'image du curseur et celle sur laquelle 
il passe, ce qui permettra de fabriquer des curseurs partiellement transparents, par 
exemple (le dernier mot de chacune de ses lignes doit aussi etre a zero), 

Les coordonnees du point chaud sont donnees par rapport au coin superieur 
gauche de l'image du curseur (cette origine a evidemment (0,0) pour coordonnees), 

Exemple de declaration : un curseur tout noir en forme de fleche en mode 320 
(voir Figure III. 9). II s'agit tres exactement du curseur systeme qu'on obtient par 
ddfaut. 



Cursor arrow =.{ 

11, f hauteur de l'image (nombre de lignes) V 

4, r largeur de l'image (nombre de mots, done 8 octets) 'I 

{ T image du curseur */ 

{ 0x00,0x00,0x00, 0x00,0x00.0x00, 0x00,0x00 }, 

{ 0x0F.Ox00,OxO0,0xO0,Ox00,OxOO,0x00,0x00 }, 

{ OxOF,0xF0,0x00,Ox00, 0x00,0x00,0x00,0x00 }. 

{ OxOF.OxFF.OxOO.OxOO.OxOO.CxOO.OxOO.OxOO }, 

{ 0x0 F, Ox FF.OxFO, 0x00 ,0x00, 0x00, 0x00, Ox 00 }, 

{ 0x0F,0xFF,0x FF.OxOO, 0x00 ,0x00,0x00 ,0x00 }, 

( Ox0F,OxFF,OxFF,0xF0,0x00,OxQ0 ,0x00 .0x00 }, 

{ OxOF.OxFF.OxFF.OxFF.OxOO.OxOO.OxOO.OxOO }, 

( 0xOF,0xFO,0xFF,0x00, 0x00,0x00,0x00,0x00 }, 

{ 0x00, 0x00 , Ox OF, Ox FO, 0x00 .0x00 ,0x00,0x00 ). 

{ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 } 

), 

[ r image du masque 7 

( Ox FF.OxOO, Ox 00 ,0x00, 0x00, Ox 00 ,0x00 ,0x00 }, 
( OxFF.OxFO, 0x00, 0x00 ,0x00 ,0x00 ,0x00 ,0x00 J, 
( 0xFF,0xFF,0x00,0x00,0x0O,0x00,0x0O,0xO0 }, 
( CxFF,0xFF,0xFO0 ,0x0,0x00, 0x00 ,0x00 ,0x00 }, 
( Ox FF,0xFF,0xFF,0x00 .0x00 ,0x00 ,0x00 ,0x00 }. 
{ OxFF.OxFF.OxFF.OxFO.OxOO.OxOO.OxOO.OxOO ), 
{ OxFF,0xFF,0xFF,0xFF,OxOO,Ox00,0x0O,0x0O ). 
{ 0xFF,0xFF.OxFF.OxFF,0xF0,Ox00,OxOO.OxO0 }, 
{ 0xFF,0xFF,0xFF,0xFF,Ox00.Ox00,0x0O,0x0O ). 
{ Ox F F, Ox FO, Ox FF, Ox FF, 0x00 ,0x00 ,0x00 ,0x00 }, 
{ 0x00 , Ox 00 , 0x0 F.Ox FF.OxOO ,0x00 ,0x00,0x00 } 

). 
1,1 r coordonnees du point chaud 7 

): 
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Figure II1.9. Lt curseur. 

Le malheur, quand on utilise ce type de structure, c'est que des qu'un element est 
declare, il en fixe la taille. Ainsi, apres la declaration du curseur de 1'exemple 
precedent, tous les autres curseurs sont condamnes a avoir il lignes de quatre mots 
dans leur definition, ce qui peut etre prejudiciable pour une application qui voudrait 
gerer plusieurs curseurs de tallies differentes. 

Dans ce cas, trois solutions : utiliser en C des types diffe>ents pour chaque taille de 
curseur, utiliser des modules en assembleur pour deTinir les curseurs, ou faire de la 
declaration sauvage en C, sans aucune structural) on. Le curseur precedent peut tr£s 
bien etre declare 1 comme une chaine de caracteres (en fait des entiers sur 8 bits), sans 
se soucier d'une quelconque definition de structure, sous reserve de quelques 
precautions : les entiers sur 16 bits que comporte la structure doivent chacun etre 
definis comme 2 caracteres de 8 bits, la moitie la moins significative avant la moitie la 
plus significatve (puisque c'est ainsi que sont represented les mots de 16 bits en 
memoire). 



char arrow] ] = { 1 1, 0, 4, 0, 
0x00,0x00,0x00,0x00,0x00. 
0x0 F , x F0 ,0 xOO, Ox 00 , Ox 00 , 
Cx0F,0xFF,0xF0,0x00,0x00 
0x0F,0xFF.0xFF,0xF0.0x00 
OxOF.OxFO.OxFF.OxOO.OxOO, 
0x00 ,0x00,0x00.0x00,0x00, 
Ox FF. 0x00 ,0x00, 0x00,0x00, 
0xFF,0xFF, 0x00,0x00, 0x00, 
OxFF.OxFF.OxFF.OxQO.OxOO 
OxFF,OxFF,0xFF,OxFF.OxOO 
0xFF,OxFF,OxFF,OxFF,0x00 
0x00,0x00, OxOF, Ox FF.OxOO , 
1,0.1,0); 



r 1 1 lignes de 4 mots */ 
0x00, 0x00,0x00, OxOF.OxOO, 0x00, 0x00,0x00, 0x00, 0x00, 0x00, 
0x00,0x00. 0x00, 0x0F,0xFF,0x00,0x00, 0x00,0x00,0x00,0x00, 
0x00,0x00, 0x0O,0xOF,0xFF,0xFF,0x0O,0x00,Ox00, 0x00,0x00, 
,0x00,0x00. 0x00 , OxOF, Ox FF , Ox FF.Ox FF.OxOO , 0x00,0x00,0x00, 
0x00,0x00,0x00 ,0x00, Ox0O,0x0F.OxF0,0x00.0x00. 0x00 ,0x00 , 
0x00,0x00,0x00, 

0x00, 0x0 , Ox 00 .Ox FF. Ox FO ,0x00 , 0x00.0x00,0x00.0x00,0x00, 
0x00. 0xOO,0x00.OxFF,0xFF,0xF0O,0x0.0x00. 0x00,0x00. 0x00. 
0x00 ,0 xOO ,0 xOO .0 x F F,0x FF, OxFF , Ox FO , 0x00 .0x00 , 0x00, OxOO , 
.Ox00.0x00,Ox00,0xFF,0xFF,OxFF.0xFF,0xF0,0xOQ, 0x00, 0x00. 
,0x00, 0x00, 0xOO,OxFF.OxFO.OxFF,0xFF,0x00,OxOO.OxO0, 0x00, 
0x00,0x00,0x00. 

r point chaud en (1,1) 7 



C'est evidemment un peu plus touffu, mais c,a donne le meme resultat ! Attention 
toutefois a I'emploi : dans le premier cas, on passera I'adresse de la definition du 
curseur en utilisant &arrow, tandis que dans le second cas, arrow suffira (plus besoin 
de l'operateur &). 
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Picture 



II y a au moins deux manieres de mEmoriser une image. On peut soit conserver le 
rEsultat final sous forme de pixel map, soit stocker les diffErentes actions qui 
s'enchainent dans la constitution d'un dessin. Une picture (au sens QuickDraw du 
terme), c'est un dessin memorise suivant la deuxieme mEthode. 

La memorisation des actions constitutives d'une image prEsente plusieurs a van- 
tages sur celle de 1'image finie : 

- elle est generalement plus concise (dans le sens ou elle tient moins de place en 
mEmoire). Cela est vrai surtout pour les dessins simples ou de petite taille, et se 
vErifiera aisEment en comparant la taille des fichiers resultant de GS-Paint et GS- 
Draw (pour des images comparables) ; 

- elle est apte a subir des deformations de taille sans que cela altere la quality 
finale du dessin : agrandir ou rEtrEcir une image modifie la forme des objets qu'elle 
contient, mais n'altEre ni I'epaisseur de leurs traits, ni I'uniformitE de leurs motifs de 
remplissage ; 

- chaque instruction QuickDraw memorisee possede un Equivalent PostScript (le 
langage de composition de l'imprimante LaserWriter), ce qui permet Timpression du 
dessin a la resolution de l'imprimante (malheureusement en noir et blanc pour 
I'instant), et non a celle de I'Ecran. 

II n'est pas toujours Evident de faire un dessin complet en utilisant des ordres 
QuickDraw simples (tels qu'ils seront dEcrits dans la troisiEme partie de ce chapitre). 
Aussi une image peut-elle contenir h son tour des dessins finis sous forme de pixel 
map, et un ordre simple de constitution de 1'image finale sera de dessiner ces parties 
d6ja mEmorisEes. 

Attention a ne pas confondre region et picture. La region est un concept 
mathematique qui permettra de manipuler des objets compliquEs (ia region memorise 
les elements constitutifs d'une forme qui sera utilised dans des dessins), la picture est 
un Element graphique achevE (elle memorise les elements constitutifs d'un dessin, par 
exemple le dessin d'une rEgjon). Seule la maniere dont une picture est memorised peut 
entretenir cette possibility de confusion. 



Modes de transf ert 



Quand un stylo doit dessiner sur une feuille de papier, gEneralement son encre fait 
completement disparaitre la couleur originate de la feuille. En informatique, on a 
plusieurs possibility pour composer la couleur du crayon et celle du fond sur (equel il 
vient dessiner. Ces possibilitEs sent dEterminEes par les modes de transfert. Sur 
1' Apple IIGS, on distinguera deux categories de modes de transfert : ceux qui 
s'appliquent au dessin, y compris le dessin du texte (transfert d'une couleur sur une 
autre couleur), et ceux qui s'appliquent au texte exclusivement (passage d'un 
caractere a un bit par pixel i un caractEre dessine, sans se soucier du fond sur lequel il 
est dessinE). 

Modes de transfert crayon 

lis sont au nombre de huit. Dans les tables et la figure qui suivent, nous donnons 
les transformations binaires propres I chaque mode. Ces transformations affectent 
individuellement chaque bit du pixel, et non une couleur en entier, ce qui peut 
conduire a des resultats inattendus en fonction des palettes de couleurs utilisEes. Pour 
ce qui est du texte, a la fois les pixels du premier plan et les pixels du fond sont 
affectes. 
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Copy 












Bi'c 








m^ 



NotCopy 



NotOr 



NotXOr 



NotBic 



Flgur* 111.10. Les modes de tnuisferts normam (blara = 0, grls ■ 1). 

• Modes Copy et NotCopy : copie la couleur source (ou sa negation) vers la 
destination. Copy est le mode typique du dessin. puisqu'il agit comme un stylo sur une 
feuille de papier. 

• Modes Or et NotOr : superposition de la source (ou sa negation) sur la 
destination. On peut utiliser ces modes pour une superposition non destructive 
d'images (normales ou inversees) sur d'autres images. 

• Modes XOr et NotXOr : « ou » exclusif entre la source (ou sa negation) et la 
destination. Ces deux modes sont ideaux pour le dessin du curseur ou des silhouettes 
d'objets a deplacer, puisqu'il suffit d'appliquer une deuxieme fbis la source sur le 
nSsultat pour r^tablir le dessin original. 

• Modes Sic et NotBic : « et » logique entre la negation de la source (ou la source) 
et la destination. Le mode Bic sert a effacer des pixels avant de superposer la source a 
la destination, le mode NotBic peut etre utilise pour reprSsenter 1'intersection de deux 
images. 

source dest Co Py NotCo Py Or NotOr XOr NotXOr Bic NotBic 
0O00 8000 0001 SOOl OOO2 8002 0003 8003 



Code hexa 
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decimal 


.1 


5 


3 


12 


7 


n 


6 


9 


4 


1 


decimal 


12 


10 


12 


3 


14 


11 


(1 


9 


2 


8 



Dans le tableau recapitulatif, nous trouvons le code hexadecimal qui sert a designer 
chaque mode de transfert, le rSsultat bit a bit de chaque mode de transfert. et enfin ce 
que cela donne sur deux couples arbitrages de couleurs. Par exemple, copier la 
couleur 3 sur la couleur 5 en mode XOr donnera la couleur 6, ce qui signifie avec la 
palette standard : pourpre sur vert fonce donne orange. 
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Modes de transfer! speciaux au texte 

lis sont egalement au nombre de huit, lis s'appliquem quand on dessine des 
caracteres (2 ou 4 bits par pixel) a partir de leur representation « noir et blanc » (1 bit 
par pixel), telle qu'elle est stockee dans la definition de la police de caracteres. En 
aucun cas les pixels du fond ne sont affected. 

• Modes ForeCopy ($0004) et NotForeCopy ($8004) ; copie des pixels du premier 
plan (eventuellement inverses) dans la destination. 

• Modes ForeOr ($0005) et NotForeOr ($8005) : effectue un « ou » logique entre 
les pixels du premier plan (eventuellement inverses) et la destination. 

• Modes ForeXOr ($0006) et NotForeXOr) ($8006) : effectue un « ou » exclusif 
entre les pixels du premier plan (eventuellement inverses) et la destination, 

• Modes ForeBic ($0007) et NotForeBic ($8007) : effectue un « et » logique entre 
les pixels du premier plan (inverses ou non) et la destination. 

Dans tout ce qui precede, le terme « pixels du premier plan » designs les pixels 
constituant le corps du caractere, dans la couleur de premier plan (ForeCofor) affectee 
au grafport (voir plus bas, le paragraphe consacre aux caractenstiques du texte). 

L'environnement de developpement proposera vraisemblablement les definitions 
suivantes, pour e^iter I'emploi de constantes num^riques : 



#da(ine Copy 


0x0000 


#define NotCopy 


0x8000 


((define O 


0x0001 


#define NolOr 


0x8001 


#define XO 


0x0002 


#define NotXOr 


0x8002 


#define Be 


0x0003 


#define NotBc 


0x8003 


#dofine ForeCopy 


0x0004 


#defina NotForeCopy 


0x8004 


#define ForeOr 


0x0005 


#define NotFareOr 


0x8005 


#define ForeXOr 


0x0006 


#defina NotForeXOr 


0x8006 


#define ForeBic 


0x0007 


#define NotForeBic 


0x8007 



CARACTERISTIQUES DU GRAFPORT 



Creer un grafport 

• On peut ouvrir plusieurs ports simultanement, sinon il ne serait pas possible 
d'avoir plusieurs fenetres a Reran en meme temps. Seul l'un des ports est actif, il est 
d^signe sous le nom de port courant. La purpart des routines QuickDraw affectent le 
port courant. Pour rendre un port courant, on utilise la procedure SetPort, dont le seul 
argument est un pointeur sur le port a activer. Pour connaitre le port courant, la 
fonction GetPort (sans argument) retourne un pointeur sur ce port. 

• Dans le chapitre consacre au Window Manager, nous verrons comment creer une 
fenetre. C'est g^ndralement a la creation d'une fenetre qu'est cre£ le grafport associe\ 
et c'est le Window Manager qui appelle la procedure OpenPort. Retenons simplement 
en premiere approche qu'un grafport est reper6 par un pointeur, et que ce pointeur 
nous est retourn£ par la fonction NewWuidow du Window Manager. 

Dans certains cas particuliers, on peut vouloir creer directement un grafport, sans 
le concours du Window Manager. Cas typique, une application peut vouloir dessiner 
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dans la meme pixel map avec deux jeux d'outils difterents : on cree alors un deuxi&me 
grafport reTerencant la meme structure Loclnfo, et on change ses autres caracteristi- 
ques par les procedures que nous verrons plus loin. L'inteTet ? Au lieu d'appeler a 
tout bout dc champ ces procedures de modification d'outils graphiques pour changer 
puis retablir une valeur, on appelle SetPort en travaillant alternativement avec Tun ou 
1' autre des grafports sur la meme image ! 

La procedure OpenPort reclame un seul argument : 1'adresse de la structure 
grafport qui sera utilis^e pour stocker les caracteristiques du port. On verifiera que la 
structure Graf Port est bien definie dans 1'environnement de travail utilise, sinon on 
rtservera la place pour un objet de 170 octets. 

GrafPort port; f un grafport 7 

GralPort *gp; /* un pointeur sur grafport 7 

gp =. GatPort( ); r pointeur sur le grafport courant 7 

Open Port(& port); r creation du grafport 7 

P°f' = *9P: /" recopie du grafport courant dans le nouveau 7 

/* modification des caracteristiques du nouveau grafport */ 
SetPort(gp); r on active I'ancien grafport 7 

r on dessine avec ses caracteristiques (crayon, texte. etc) 7 
SetPortf Sport); f on active le nouveau grafport 7 

f on dessine avec ses caracteristiques (crayon, texte, etc) 7 



Dans l'exemple, en declarant port de type GrafPort, on reserve la place necessaire 
pour y stocker ses caracteristiques, la place memoire necessaire au grafport pointe par 
gp ayant ete reservee par la fonction qui I'a creee (even tue Heme nt par le Window 
Manager). Ensuite, la procedure OpenPort est appeiee. Elle initialise le nouveau port 
avec les valeurs standard et alloue 1'espace necessaire a la manipulation de la clip 
region et de la region visible. Ce port devient le port courant. II sera utilisable jusqu'a 
1'appel de la procedure ClosePort, qui desallouera 1'espace occupe et ecartera les 
handles sur les regions associees. L' instruction suivante est tres puissante, mais tous 
les compilateurs C ne l'acceptent pas forcement. II s'agit d'une assignation de 
structure. A droite, *gp represente une variable de type GrafPort. A gauche, port 
6galement. Le signe = (assignation) fait que la variable de gauche va prendre la valeur 
de la variable de droite, il s'agit done bien ]k d'une recopie du contenu de tous les 
champs constituant la structure. Les environnements Megamax (dont 1'APW-C) 
acceptent une telle instruction C. La recopie fait notamment que les deux grafports 
ont alors la meme Loclnfo associee, done que les outils de dessin vont bien toucher la 
meme image ! 

Remarque Un grafport existant peut etre reinitialise grace & la procedure I nit Port. 
OpenPort appelle d'ailleurs InilPort avant de cr£er la clip region et la region visible. 
Les deux procedures ont la meme syntaxe. 

• Quand e'est le Window Manager qui ouvre un nouveau port, la structure Loclnfo 
associee designe Fecran tout entier, et on n'a toujours pas de question a se poser. 
Quand par contre on veut dessiner en dehors de 1'ecran, il faut d£finir une pixel map 
distincte de la memoire ecran et ses donnees add itionne lies. Pour inclure ces nouvelles 
donnees dans la definition du grafport courant, on utilisera la procedure SetPortLoc, 
dont le seul argument est un pointeur sur la nouvelle structure Loclnfo. 

Loclnfo infos; /* une structure Loclnfo 7 

long taille; /* taille en octets de la pixel map 7 

taille = 1280L; f 40 lignes de 32 octets 7 

infos. PortSCB - 0; /* SCB standard en mode 320 7 

infos. basoAddr = *NewHandle(taille, mylD, OxCOOO, 0L);T allocation memoire, bloc fixe 7 

infos. rowByt&s = 32; I* nombre d'octets par ligne 7 

SetRect(& infos. BoundsRect, 0, 0, 50, 40): f 50 pixels de large sur 40 de haut 7 

SetPortLoc(& infos); f mise en place de la structure 7 
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Le fait de s'allouer de la memoire par la fonction NewHandle nous assure que nous 
ne travaillerons pas dans la memoire ecran, done que nous dessinerons bien hors 

Notons quelques chausse-trapes dans lesquelles it ne faudra pas tomber. Le but 
final est d'obtenir une image de 50 pixels de large sur 40 pixels de haul, ainsi qu'en 
temoigne le champ BoundsRect de la structure. Puisque nous sommes en mode 320, il 
faut 25 octets pour coder les 50 pixels. rowBytes sera done le plus petit multiple de 8 
supeneur ou egal a 25, sott 32, et la pixel map s'etendra sur 32 x 40 octets. Pour 
eviter de se tromper, rien ne vaut une bonne formule de calcul. Si r represente le 
rectangle frontiere de la Loclnfo, on a : 

Beef r; f un rectangle */ 

intos.ro wBytes - (r right « r./eft} 7 : {(r.right- r.feft- 1) / 16 ) + 1) * 8; 

r valable en mode 320 uniquement, remplacer 1 6 par 32 en mode 640} 7 
taille - (long) {(.bottom - r. top) ' infos. mwBy res; /"memoire a allouer V 

Ajoutons que la procedure GetPortLoc permet de connaitre (par son adresse) la 
structure Loclnfo du port courant, ee qui est pratique pour jongler par exemple de la 
m£ moire ecran a un dessin hors ecran : 



Loclnh oldloc: r une structure Loclnfo V 

GetPortLoc(Soldloc). f on rccupere la structure courante 7 

f on prepare les caracteristiques de la nouvelte structure V 
SetPortLoe(& infos); /* mise en place de la nouvelle structure 7 

r on dessine avec les caracteristiques du grafport courant hors ecran '/ 
SetPortLocfS oldloc); f retablissement de I'ancienne structure 7 

r on dessine de nouveau dans la me mo ire ecran •/ 

Remarquons qu'avec cet exemple, les caracteristiques d'un grafport servent pour 
dessiner a deux endroits d liferents, ce qui est exactement le contraire de I'exemple du 
point precedent, ou on utilisait les caracteristiques de deux grafports distincts pour 
dessiner a un endroit unique, QuickDraw autorise sans sourciller ce genre de liberies. 

• Terminons par le rectangle PortRect, qui delimite la surface dans laquelle on 
pourra dessiner. Quand le Window Manager cr6e une fenetre, ce rectangle est 1'un des 
parametres a renseigner. Dans le cas oil nous voudrions dessiner en dehors de I'ecran 
(suite de Pexemple precedent), la procedure SetPortRecl nous permet de fixer ce 
rectangle : 



Reel r; i* un rectangle */ 

SetRect(Sr, 0. 0, 50, 40); /* un rectangle est defini */ 

SetPortRect(&r); I* PortRect est fixe */ 



Notre PortRect coincide avec le rectangle frontiere de la pixel map. C'est souvent 
le cas quand on dessine en dehors de I'Scran, puisque le defilement permis par les 
fenetres n'a aucune raison d'etre. 

Notons que Get PortRect est une procedure qui permet de connaitre le PortRect du 
grafport actif. On passe en argument 1'adresse du rectangle qui recevra le PortRect. 

Nous laisserons de cote l'6tude de routines telles que SetPortStze (sert a modifier la 
taille du port courant) et MovePortTo (sert a deplacer le port courant), qui sont 
principalement appelees de maniere interne par le Window Manager quand une 
fenetre doit etre redimensionne'e ou deplacee. 
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Deux regions associees au grafport 

• La clip region peut etre modifiee au gre de Fapplication, grice a deux procedures, 
SetClip et CtipRect. La premiere admet comme unique argument un handle sur une 
region qui va devenir la nouvelle clip region. La seconde permet de donner a la 
nouvelle clip region la forme d'un rectangle (dont un pointeur est pass£ en argument). 

Pour connaitre la clip region eourante, une procedure, GetOip, dont 1'unique 
argument est un handle qui pointe de maniere indirecte sur une region qui va recevoir 
la clip region. 

Lors de ces trois appels, il y a copie de region. Le grafport conserve dans la 
structure qui lui est associee un handle sur la clip region. SetClip ne modifie pas ee 
handle, mais copie la definition de la region associee au handle passe en argument 
dans celle du handle associe au grafport. De meme, GetClip ne rdcupfcre pas un handle 
sur la clip region, mais une copie de la clip region dans I'espace me moire d£signe par le 
handle passe en argument. 



Pour changer le handle sur la clip region associee a un grafport, on utilisera la 
fonction SetClipHandle. Pour connaitre le handle sur la clip region associee a un 
grafport, on utilisera la fonction GetClipHandle. Les appels auront cette forme : 



Hands oldclip, newclip; r deux handles sur region */ 

Oldclip = GetClipttandle () ; /* recup&re la handle associe au grafport 7 

SetClipHandle(newclip); f change le handle associe au grafport 7 

Rien ne vaut un exemple pour mettre les choses au clair. Supposons que nous 
voulions dessiner le fameux demi-cercle, mais que nous ne sachions pas quelle est 
1'actuelle clip region. Nous allons la recupgrer et la garder au chaud, la require a notre 
demi-carr£ pour executer le dessin (par intersection, tant pis si tout n'est pas dessin£), 
puis la re'tablir. 



Handle oldclip, newclip, demicadra; f trois handles sur region V 

Rect cadre: r un rectangle 7 

oldclip - NewRgn( ); r on recupere up handle sur region 7 

newclip = NewRgn( ) ; r et un deuxiems *l 

demicadre . NewRgn( ); r et un troisieme 7 
CetClip(olddip); r on recupere la clip region actuelle (par copie)7 
SetRectRgn (demicadre, 50, SO, 100, 150); r ce sera noire demi-carrS 7 

Sect Rgn (oldclip, demicadre, newclip); f intersection des deux regions 7 

SetClip(newclip); f on fixe la nouvelle clip region (par copie) 7 

SetRect(icadre, 50, 50, 150, 150): r ce rectangle est un carre */ 

PaintOval(Scadre); T on dessine le cercle entier, seule une moiti6 est prise en compte 7 

SetCllp(oldclip); r on rfitablit Tancienne clip region (par copie) V 

DisposeRgn(aldclip); r on fait le menage 7 

DisposeRgn(newclip); r on fait le menage 7 

DiaposeRgn (demicadre); /* on tail le manage */ 



On remarquera que les trois handles manipulcs dans cet exemple (on aurait pu 
faire I'economie de I'un d'entre eux) ont etc obtenus par la fonction NewRgn. II faudra 
en prendre 1'habitude : aucune des routines de manipulation des regions n'a 6t€ 
concue pour s'allouer elle-meme I'espace n£cessaire. 



QUICKDRAW I 67 



(50,50) 



(100,50) (150,50) 



( 


ce demi- \ 

rectangle 
ne fait pas 
partiedela J 
clip region / 



(50,150) 



(100,150) 



(150,150) 



Figure 111,11. Dbsui d'un demi-rercle. 



En faisant l'impasse sur la forme et la localisation de la clip region en eours, on 
pouvait ecrire la meme chose un peu plus simplement : 



Handh oldclip; 

Reel cadre, demicadre: 

oldclip = NewRgn(); 
GetCI!p(oldclip); 

SctRectl&demicadre. 50. £0, 100, 150); 
CI i p R a c t( 5 demicadre) ; 
SetRectfScadre, 50, 50, 150, 150); 



r handle sur region */ 
r deux rectangles */ 

r on recupere un handle sur region */ 
Ton recupere la clip region actus He V 
/* ce sera notre demi-carre V 
r on fixe la nouvelle clip region 'I 
r ce rectangle est un carre */ 



PatntOval(&cadre); /* on dessine le cercla entier, seule une moitie est prise en compte */ 
SetClipfoldclip); F on rStaMit lancienne clip region V 

DisposeRgn(oldcfip); /* on fait le menage 'I 



• La region visible possede deux outils identiques, SelVisRgn et GetVisKgn. qui 
permettent de la fixer et de la connaitre. Ces fonctions sont d'utilisation absolument 
identique a SetClip et GetClip, nous ne nous y attarderons done pas. 

Notons toutefois que e'est le Window Manager qui utilise le plus ces procedures, 
notamment au moment de mettre a jour une fenetre : la procedure BeginUpdalc 
modifie 1'actuelle region visible de la fenetre avant mise a jour et la procedure 
End Update la retablit apres. 

Idem pour les routines SelVisHandle et GetVisHandle, qui permettent de modifier 
ou connaitre le handle sur la region visible associe"e au grafport. 



Pattern d'arriere-pian 

Ouand un port est cree\ il est uniform^ment rempli par un pattern (le de7aut 
pattern est le pattern solide de couleur blanche). On vient dessiner par-dessus ce 
pattern. Pour effacer un dessin, il suffira de remplir la surface correspond ante avec ce 
pattern d'arriere-plan. 
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Les routines SetBackPat et GetBackPat permettent de fixer ou dc connaitre le 
pattern d'arrie re-plan. La procedure SetSolidBackPat permet de fixer un pattern 
solide (c'est-a-dire une veritable couleur, tous les pixels de couleur identique). 

Le fonctionnement de ces routines est identique a celui des routines g£rant le 
pattern du crayon, eludiees dans le paragraphe suivant. Aucune de ces routines n'a 
d'effet imme'diat a I'&ran. 



Caracteristiques du crayon 



A chaque port est associe un crayon, dont on peut modifier les caracteristiques. La 
procedure PenNormal (sans argument) retablit les caracteristiques par defaut du 
crayon du port courant, telles qu'elles sont utilisees au moment de son initialisation (la 
localisation n'est pas affectee). 

• Localisation du crayon : c'est le point (en coordonnees locales) oil se trouve 
presentement le crayon. Si une procedure de dessin de ligne ou d'£criture de texte est 
invoqu^e, elle utilisera cette localisation eomme point d'origine. Les procedures Move 
et MoveTo permettent de changer la localisation du crayon. 

Mov*To(50, 30); f positionne le crayon sur le point (50,30) */ 

Move(1 0, 20); r deplace Is crayon de 1 points horizontalement et 20 verticalement */ 

Apres ces deux instructions, le crayon est positionne sur le point (60,50), 
Evidemment, des valeurs positives dans la procedure Move indiquen! un defacement 
vers la droite ou vers le bas, et des valeurs negatives un deplacement vers la gauche ou 
vers le haut. 

Pour connaitre la localisation courante du crayon, on utilisera la procedure 
GetPen : on passe en argument Cadresse d'un point (voir plus bas la definition de la 
structure Point) qui recevra le resultat : 

Point loc; Tloc a une structure de point V 

int x, y: 

GetPen(Kloc); /• le point courant est renseigne dans loc 7 

x - loc.H; r abscisse du point */ 

y=loc.V; r ordonnfie du point */ 

• Taille du crayon : le trait qu'est capable de tracer un crayon n'est pas limits a un 
pixel d'dpaisseur, mais peut etre quelconque. II suffit de de"finir ce que nous pouvons 
appeler une « unite de tracagc », largeur et hauteur de chaque element du trait. Le 
« point chaud » de cette unite de tra^age en sera le coin superieur gauche (quand on 
tracera une ligne, les coordonnees s'appliqueront a ce point j pour des objets plus 
complexes, ce ne sera pas tou jours vrai, eomme nous le verrons plus loin). Les 
routines Set Pen Size et GetPenSize permettent de fixer ou de connaitre la taille du 
crayon. Par defaut. la taille est 1 x 1, 

Paint pt; 

G*tPanSlze(&pt); /• on recupere la taille de I'unite de tracage */ 

SetPenSlie(3,4); r I'unite de tracage sera large de 3 pixels, haute de 4 V 

"on dessine avec cette unite 7 
SetPenS]ze(pt.H, pt.V); f on retablit I'ancienne unite 7 

• Mode du crayon : c'est le mode de transfert tel que nous l'avons e"voqu6 plus 
haut. Les routines SetPenMode et GetPen Mode permettent de fixer ou de connaitre le 
mode de transfer! du crayon. Le mode par defaut est Copy. 
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int oldmode; 

old mode = GetPenModa( ) ; f sauvegarde du mode courant 7 

SetPenMode(NofOr); f utilisation du mode NotOr V 

f dessins avec le nouveau mode "/ 
SetPenModefoldmode) : /"on retablit fancier mode 7 

Dans cet exemple, on commence par mettre en memoire le mode courant, puis on 
fixe un nouveau mode, on dessine en 1'utilisant, el enfin on retablit I ancien mode. 

• Pattern du crayon : puisque 1'unite de tracage n'est pas limitee a un pixel, on peut 
definir pour le crayon un pattern avec lequel il tracera ses traits. Ce pattern de 
remplissase de traits fonctionne de maniere identique au pattern de remplissage de 
formes vu plus haut. Les routines SetPenPat et GetPenPat permettent de fixer ou de 
connaitre le pattern du crayon (veritable pattern, pixel par pixel). La procedure 
SetSolidPenPat permet de fixer un pattern solide au crayon (c'est-a-dire une veritable 
couleur, tous les pixels de couleur identique). Le pattern par defaut est le noir, 
couleur solide. 

Un pattern est un objet assez delicat a definir : puisqu'il represente huit fois huit 
pixels il sera de taille 256 bits en mode 320 (oil un pixel est code sur 4 bits) et de taille 
128 bits en mode 640 (oil un pixel vaut 2 bits). On accedera toujours a un pattern par 
l'intermediaire d'un pointeur. Pour definir le pattern, il faudra jouer sur les bits ! 

Creation et utilisation d'un pattern en mode 320 : 



Pointer oldpat; 

char newpat[32]; /* chaque caractere represente 2 pixels V 

oldpat = GetPenPat( ) ; f on recupere I'adresse du pattern courant */ 

for (i=Q; i<8; ++i) 

newpalI4*i] = 0x33: /* couleur 3 pour les deux premiers pixels de chaque ligne 7 

newpat[4*i+ 1 ] = 0x35: /* couleur 3 pour le 3eme pixel, couleur 5 pour le 4eme V 

newpat[4'i+2] - 0x53: /* couleur 5 pour le 5eme pixel, couleur 3 pour le 6eme 7 

newpat[4"i+31 - 0x33; r couleur 3 pour les deux derniers pixels de chaque ligne 7 

SetPenPat(newpai); r on fixe un nouveau pattern 7 

f dessins avec le nouveau pattern 7 
SetPenPat(oldpat); I" on retablit I'ancien pattern */ 



Le pattern cree est eonstitue de deux bandes verticales, 1'une tres large de la 
couleur correspondant a l'entree n" 3 de la table de couleurs active, 1'autre tres mince 
ayant la couleur n" 5. Apres avoir sauvegarde le pattern courant, on fixe ce nouveau 
pattern, on dessine avec, et enfin on retablit i'ancien, 

Ainsi qu'il a eie dit dans ['introduction, il ne sera generalement pas equivalent de 
declarer un pattern char[32], int[16] ou long[81 (mode 320), a cause de la position 
inversee des octets haut et bas en memoire. Nous verrons dans d'autres chapitres (VI 
et XI, notamment) des exemples de definition de patterns en mode 640, 

Creation et utilisation d'un pattern solide : 



Pointer oldpat: /* un pointeur 7 

oldpat = GetPenPat( ): I" on recupere I'adresse du pattern courant */ 

SetSolidPenPat(B); f utilisation de la couleur n°8 de la table */ 

P dessins avec le nouveau pattern 7 
SetPenPat( oldpat); f on retablit I'ancien pattern 7 
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On constate que l'utilisation d'un pattern solide, c'est-a-dire une couleur uniforme, 
est nettement plus commode ! II suffit de preciser le num£ro de la couleur dans la 
table active, et QuickDraw se dSbrouille, quel que soit le mode d'afflchage utilise. Peu 
importe si l'ancien pattern etait solide ou pas, on le memorise comme un pattern 
quelconque, par son adresse. 

Notons une procedure interessante, qui permet de faire d'un pattern un pattern 
solide, SolidPattern, ce qui offre une alternative a l'utilisation de SetSolidBackPat ou 
SetSolidPenPat. L'exemple suivant est equivalent au precedent, sauf que le pattern 
solide d£fini peut etre utilise ailleurs. 

char colPat(32]; r reserve de la place pour le no iftreau pattern 'I 

Pointer oldpat; 

SolidPatternfcolPat, 8); /* le nouveau pattern est solide (couleur 8 de la palette active) */ 
oldpat = GetPenPat{ ); /* on reeupere I'adresse du pattern courant 'I 

SetPenPat(colPat); /* on fixe un nouveau pattern (solide) V 

T dessins avec le nouveau pattern 7 
SetPenPat( oldpat); /* on retablit l'ancien pattern */ 

• Masque du crayon : associe au pattern, a ies fonctions vues plus haut. Les 
routines SetPenMask et GetPenMask permettent de fixer ou de connaitre le masque 
du crayon. Par defaut, tous les bits du masque sont a un. Un masque elant une 
collection de huit fois huit bis, on peut le miimoriser sous forme de char[8] et y acceder 
par 1'intermediaire d'un pointeur : 

Pointer oldmask; 
char newmask[8I; 

oldmask ■ GetPenMask( ); t on recupere I'adresse du masque courant 7 

newmaskpj = newmask[2J = newmask[4] - newmask[6] > OxAA; 
newmask(f] = newmask[3] = newmaskjsj = newmask[7] = 0x55; 
SetPenMask(newmask); r on fixe un nouveau masque */ 

r dessins avec le nouveau masque 7 
SetP en Mas k( oldmask): r on retablit l'ancien masque *1 

Dans cet exemple, I'adresse de l'ancien masque (qu'il ait et£ fixe" ailleurs par 
('application, ou que ce soit le masque par defaut utilise par QuickDraw) est 
sauvegardee, puis un nouveau masque est fixe pour executer certains dessins, et enfin 
le masque precedent est retabli. Les valeurs $AA et $55 utilisees ici sont remarqua- 
bles, puisqu'elles s'ecrivent en binaire 1010 1010 et 0101 0101 respectivement. On 
cree done un masque qui tie laisse passer qu'un pixel sur deux, en quinconce. 

• Toutes les caracteristiques pr£cedentes du crayon (localisation, taille, mode, 
pattern et masque) sont re"sum£es dans une structure appel£e PenState dont nous ne 
donnerons pas la definition en C car elle fait intervenir la notion de pattern (dont la 
taille depend du mode utilise). Le plus simple est d'utiliser un bloc de 50 octets (4 pour 
la localisation, 4 pour la taille, 2 pour le mode, 32 pour le pattern et 8 pour le masque). 
Par 1'intermediaire d'un pointeur sur un tel bloc, la procedure GetPenState permettra 
de m£moriser toutes les caracteristiques du crayon en cours d'utilisation, et la 
procedure Set PenState de les retablir. 

char state[50]; r reserve 50 octets 'I 

GetPenState(state); f on memorise les caracteristiques du crayon V 

/* modifications diverses, utilisation d'un nouveau crayon 7 
SetPenState(state); r on retablit l'ancien crayon 7 

• Niveau d'invisibilite du crayon : le crayon peut etre visible ou invisible, et deux 
procedures gerent le niveau d'invisibilite du crayon. HidePen le d£cremente tandis que 
ShowPen l'i n crimen te. Ce niveau est initialement a zero, signifiant que le crayon est 
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visible, done que ce qu'il dessine apparait a I'ecran. Quand ce niveau devient negatif, 
le crayon devient invisible : les dessins sont executes, mais n'apparaissent plus. 
L'interet de niveaux multiples dans I' invisibility est evident : supposons qu'un sous- 
programme veuille (aire quelque chose de non visible {voir par exemple la definition 
d'une region, plus bas), II commence par appeler HidePen, fait ce qu'il a a faire, et 
termine par ShowPen. Globalement, il a retabli le niveau d'invisibilite du depart. Si 
avant I'appel du sous-programme, le crayon etait deja invisible, il Test toujours aprfes, 
malgre I'appel de ShowPen. Ces deux procedures devraient toujours etre appelees 
conjointement, com me une parenthese ouvrante et une pare n these fermante. 



Caracteristiques du texte 

Tout ce que nous allons dire dans ce paragraphe ne presentera plus enormement 
d'interet quand le Font Manager sera vraiment ope rati on nel. II suffit de comparer une 
partie des appels que nous allons voir, et la seule procedure InstallFont que nous 
verrons en fin de chapitre X pour en convenir. 

• Tout texte sera ecrit en utilisant une police de caraeteres determinee. Les 
routines Set Font et GetFont permettent de fixer ou de connaitre la police de caraeteres 
utilisee (par rintermediaire d'un handle). Idem sur la police systeme avec SetSysFont 
et GetSysFont. 

• Les polices de caraeteres peuvent etre de largeur fixe ou proportionnelle. Largeur 
fixe signifie que tous les caraeteres ont la meme largeur (la lettre m occupera la meme 
place que la lettre i dans un texte, mais il y aura beaucoup plus de vide autour du i 
qu'autour du m). Largeur proportionnelle signifie au contraire que chaque caractere a 
sa propre largeur, rendant la lecture plus harmonieuse. 

Dans les 16 bits du champ FontFtags qui donne certaines precisions sur les 
operations affectant le texte dessine dans le grafport, le bit precise si la police de 
caraeteres doit etre consideree comme fixe (1) ou proportionnelle (0). Les routines 
SetFontFlags et GetFontFlags permettent de fixer ou de connaitre le champ FortfFlags 
lie au port courant. On peut notamment rendre fixe a 1'affichage une police 
proportionnelle (ia largeur du plus grand des caraeteres fixant la largeur de tous les 
caraeteres). 

Dans les deux cas, le dessin d'un caractere est defini par un rectangle dont les pixels 
sont noirs ou blancs, le noir representant le corps du caractere et le blanc le vide 
autour. La hauteur du rectangle est caracteristique de la taille de la police de 
caraeteres, la largeur est variable (polices pro portionne lies) ou fixe (polices fixes). 

• Quand QuickDraw dessine un caractere, il dessine en fait un petit rectangle. Si le 
mode de transfer! du texte est un mode normal, la couleur ForeColor du grafport est 
utilisee pour le corps du texte, et la couleur BackColor est utilisee pour remplir les 
vides. On peut par exemple obtenir un rectangle representant une lettre en bleu sur 
fond jaune. C'est a ce rectangle que va s'appliquer le mode de transfert, pour 
recouvrir ce qu'il y a deja sur I'ecran. 

Si le mode de transfert du texte est un mode special texte, la couleur ForeColor est 
utilisee de maniere identique, mais le fond reste vide, et le mode de transfert ne 
s'applique qu'au corps du texte. 

Les procedures SetForeColor et SetBackCoIor permettent de fixer les couleurs 
affectant le texte (corps et fond), les fonctions GetForeColor et GetBackColor 
permettent de connaitre ces couleurs. Les routines SetTextMode et GetTextMode 
permettent de fixer ou de connaitre le mode de transfert applique aux textes. 

Exemples d'utilisation (assume que la palette standard en mode 320 est utilisee) ; 
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inl forecol, backcol, txtmode: 

forecol ■ Getf oreCotor( ); /* memorise la couleur du corps du texte 7 

backcol ■ GatBackColorf ); f idem couleur fond de texts 7 

txlmode = GeiTextModej ); r idem mode de transfert du texte 7 

SetForeCcHor(9); r corps du texte en jaune (entree n°9) 7 

SetBackCofor(4); f fond bleu (entree n°4) 7 

SetText Mode (Copy); r mode Copy */ 

f on ecrit avec ces caracteristiques, on peut ensuite retablir les precSdentes */ 

Avec les trois instructions pr^cedentes, tout texte ulterieur sera dessine en jaune 
sur fond bleu, ecrasant tout ce qui pourrait se trouver deja sur I'ecran (plus 
exactement dans la pixel map). 

• On peut dormer un style a un texte, par deformation calculee du dessin des 
caracteres. Cinq styles sont predefinis, ils sont selectionn£s en mettant a un le bit 
correspondant du champ TxFace. 

bit : gras 

bit 1 : italique 

bit 2 : souligne 

bit 3 : relief 

bit 4 : ombri 

Par combinaison, on obtiendra des styles composes. Par exemple, la valeur 5 
signifiera gras soultgne\ puisque 5 s'ecrit en binaire 0000 0000 0000 0101. La valeur 
signifie absence de style, il s'agit done de texte normal (plain text, en anglais). Les 
routines SelTextFace et GetTextFace permettent de fixer ou de connaitre le style 
employe pour dessiner du texte. 



face • G«TextFace( ) ; f quel est le style courant? 7 

if (face & 4) SetTextFace(face-^l); r on en supprime le souligne */ 

Dans ['exemple precedent, si le style courant contient 1'indicateur « souligne » 
positionne (e'est-a-dire le bit 2 a un, e'est pourquoi on compare avec la valeur 4), on 
le supprime, sans affeeter les autres bits. On passe ainsi du gras italique souligne au 
gras italique, ou du souligne au style standard. On pourra verifier que lecriture 
suivante est equivalente (puisque FFFB en hexa s'ecrit 1111 1111 1111 1011 en 
binaire, on force le bit 2 a zero) : 

SeiTextFae«(GetTextFace( ) a OxFFFB); /* on supprime le souligne du style courant */ 

Note Seuls les styles gras et souligne sont deiinis en memoire morte. La version 
1.02 de QuickDraw ne connait pas encore les autres styles. 

• On peut changer la taille des caracteres dessine^ grace a la procedure SetTextSUe, 
ou connaitre la taille actuelle avec la fonction GelTextSize. La taille est exprimee en 
nombre de points, mais il ne faut pas toujours accorder une signification exacte a ce 
nombre : en fonction de la definition d'un jeu de caracteres, une taille 14 peut paraitre 
plus petite qu'une taille 12. 



taille - GeiText Sizei ) ; f on memorise la taille en cours */ 

SetTextSlze(1 2); r on fixe la taille 12 7 

T on dessine du texte dans cette taille 7 
SetTextSlzB(taille); r on retablit la taille precedente 7 
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• Un des champs du grafport s'appelle FontlD. C'est un entier long, dont le mot 
haul contient I'identifiant d'une famille de caracteres, et le mot bas la taille et le style 
de la police desiree. Le fait de modifier ce champ n'affecte en rien le dessin du texte 
par QuickDraw, mais les programmes (et notamment les programmes utilisant 
1'impression laser) viendront chercher dans ce champ les caractenstiques desirees par 
1'application ou par 1'utilisateur, On passera par I'intermediaire du Font Manager, 
plutdt que par la procedure SttFontID pour modifier ce champ. La function 
GetFontlD (sans argument) en retoume le contenu (entier long). 

Champ utilisateur 

Pas grand chose a dire a son propos. Dans sa grande generosite, QuickDraw nous 
offre quatre octets de stockage assories a chaque grafport, que 1'application peut 
utiliser comme elle ['en tend. On pourra par exemple y stacker I'adresse d'une 
procedure de dessin, ou n'importe quoi, ou rien du tout. La procedure SetUserField 
permet de stocker dans le champ la valeur passee en argument (entier long), la 
fonction GetUserField retourne (dans un entier long) le contenu du champ. 

long val ; 

val - GetU serFieldj ) ; r on recupere la valeur 7 

SetUserField(val + 1 ); r on la change */ 



STRUCTURE ET MANIPULATION 

Attention Avant d'utiliser les routines presentees dans cette section, il faut avoir 
initialise QuickDraw avec la procedure QDSlartlip. 



Point 

La manipulation d'un point peut se faire de plusieurs manieres, ce qui peut 
provoquer une certaine confusion. Une structure de type Point est d£finie, et un point 
est soit repere par un pointeur sur ce type de structure, soit utilise directement ses 
coordonnees (abscisse et ordonnee dans un systeme de coordonnees donne). On 
pourra egalement voir un point comme un entier long, abscisse dans le mot haut et 
ordonnee dans le mot bas (nous ne nous en priverons pas dans les chapitres suivants). 

La structure de type Point peut etre dSfinie de la maniere suivante : 

struct _Point [ 

int V; I" coordonnee verticale (ordonnee) */ 

int H ; f coordonnee horizontals (abscisse) 7 

); 

#define Point struct Point: 

La procedure SetPt permet de remplir une structure de type point a partir de ses 
coordonnees. 

Exemple 

Point Pi; /* un point '! 

S»tPt(aPt, 50, 100); r Pt represents le point (50,100) 7 

r equrvaut a: 
PtH-50; 
PLV- 100; 
*/ 
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On notera I'ordre different entre les arguments de SetPt et les Aliments constitutifs 
de la structure Point. La declaration suivante est absolument equivalente a la 
precedente : 



long pt; 
S«tPt(8pt, 50, 100); 



r un entier long "I 

T pt represents to point (50,1 00) 7 



Calculs sur les points 

• QuickDraw met a notre disposition plusieurs routines pour faire des calculs sur 
les points. AddPt permet d'obtenir la sornme des coordonnees de deux points 
(addition vectorielle) et SubPt leur difference. On d£signe les points par I'intermd- 
diaire de pointeurs, le premier operand e reste inchange" tandis que le second recoit le 
resuitat. Dans le cas de la soustraction, on fait second ope>ande moins premier 
operande. 



Point pt1, pB; 

SetPt(Spt1 . 50, 100); 
SetPt(&pt2, 20. 30); 
AddPt(fipt1,&pt2); 

SubPt(&pt2, &pl1); 



T deux points V 

r on fine le premier point V 

r on fixe le second point 7 

f le point pt1 reste ind-iange", c'est (50,1 00) */ 

f le point pi2 devient (70,130) 7 

r le point pt2 reste inchang^, c'est (70,130) V 

T le point pt1 devient (-20,-30) V 



• La fonction EqualPt nous permet de savoir si deux points ont memes coordon- 
nees ou pas. Elle retourne la valeur TRUE en cas d'egalite, FALSE si les points sont 
distincts. La fonction n'affecte pas la valeur des points ; 

int result; 

Point pt1 , pt2; r deux points 7 

result - EqualPt(&pt1 , &pt2); f result est non nul si pt1 el pt2 represented le memo point 7 

* QuickDraw nous offre deux procedures pour convertir les composantes d'un 
point du systeme de coordonnees locales (defini par le PortRect du grafport courant) a 
celui de coordonnees globales (detim par le coin superieur gauche du Bounds Reade 
la pixel map ou on dessine) et reciproquement. Les deux procedures affectent le point 
dont un pointeur est pass6 en argument. 



Point pt; 



LocalToGlobal(Kpt); 
GlobalToLocal(Spt); 



f un point */ 

r pt est traduit en coordonnees globales */ 
r pt est traduit en coordonnees locales 7 



Apres ces deux appels, le point a retrouve ses composantes d'origine : les deux 
procedures sont reoproques Tune de ['autre. Pour passer des coordonnees locales 
d un grafport a celles d'un autre, on changera de port courant entre ces deux appels 
{gr4ce a la procedure SetPort). 
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Rectangle 

Le rectangle est une structure mathematique primordiale dans les concepts 
QuickDraw. On se referera toujours a un rectangle par rintermediaire d un potnteur. 

La structure de type Rect peut etre definie de la maniere suivante : 



struct _Rect { 
int top ; 
int left; 
int bottom; 
int right ; 

)■ 
#deline Rect struct _Rect; 



r coordonnee verticals du coin superieur gauche */ 
T coordonnee horizontals du coin superieur gauche */ 
I* coordonnee verticals du coin superieur droit 7 
r coordonnee horizontal du coin superieur droit 7 



Pour d£finir un rectangle, QuickDraw met a notre disposition deux procedures, 
SetRect a partir de ses quatre coordonnees, et PtZRect a partir de deux points : le coin 
supeneur gauche et le point inferieur droit. Cette limitation est deplorable : sur 
Macintosh, cette procedure accepte deux points diagonalement opposes, sans 
restriction sur la position relative de chaque coordonnee. 



Rect 
Point 



r1,r2: 
pn . pr2: 



SetRect(&r1,40,30, 150,180); 
r equivaut a. 
r1.feff = 40; 
M.fop-30; 
rl.rfcflJ- 150; 
r1, bo from -180; 
V 

SetPt(Spt1.40,30); 
SetPt(&pl2. 150,180); 
Pt2Rect(&pt1,&pr2, Sr2); 



r deux rectangles 7 
f deux points */ 



f on fixe le rectangle 7 



T coin superieur gauche du rectangle 7 
r coin inleVieur droit du rectangle V 
r on fixe le rectangle 7 



Apres ces instructions, les deux rectangles df finis sont identiques. On notera 
Tordre different entre les cornposantes de la structure Reel et les arguments de la 
procedure SetRect. 

Avec SetRect, le rectangle resultant sera vide si right == left ou si bottom ^ lop. 
Avec PttRect, il sera vide si le deuxieme point n'est pas plus bas et plus a droite que le 
premier. 



Calculs sur un rectangle 

• La procedure OfTsetRect permet de d£placer un rectangle sans affecter sa taille. 
Le deplacement horizontal s'effectue de dH pixels (vers la droite si dH est positif , vers 
la gauche sinon). le deplacement vertical de dV pixels (vers le bas si dV est positif, 
vers le haul sinon). 



Root *rect; 
int dH, dV; 

dH - 5; 

dV-10; 

OffsetRectfrect, dH, dV): 



T pointeur sur rectangle 7 



r deplacement horizontal 7 

r deplacement vertical 7 

t les coordonnees du rectangle sont modifiees 7 
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(20,5) 



(40.10) 



(15,30) 




(20.25) Rectangle 
en fin 
d'opa ration 




(35,25) 



lnsetRect(theRect,5,-5) 



OffsetRect(theRect,5,lO) 



Figure III. 12. Wformalioii et emplacement d'un rectangle. 



* La procedure InsetRucl agrandit ou retreat un rectangle sans deplacer son centre. 
Si dH est positif, les deux bords verticaux se rapprochent, chacun se deplagant de dH 
pixels (sinon Ms s'<Sloignent). Si dV est positif, les deux bords horizontal se 
rapprochent, chacun se deplacant de dV pixels (sinon ils s'&oignent). Ouand dH ou 
dV est trop grand, on peut obtenir un rectangle vide (les quatre coordonnees sont 
alors forcees a zero). 



Reel *rect; 
int dH, dV: 

dH = 5; 
dV - -5; 
lnsetRect(rect, dH, dV); 



T pointeur sur rectangle */ 



T demi-rStrecissenrtenl horizontal 7 

f demi-elargissement vertical 7 

r les coordonnees du rectangle sont modifiees 



Attention Aucune de ces operations n'entraine un effet visible a 1'eeran. Quick- 
Draw ne fait que modifier les coordonnees d'un rectangle. 

• La fonction Empty Rect teste si le rectangle points par son argument est vide, et 
retoume (bizarrement) FALSE dans ce cas (voir 1'un des exemples du chapitre V). 



flscl r1 , r2: 
int x, y; 



r deux rectangles */ 

r pour recevoir una valeur booleenne V 



SetRect(&r1 , 10, 20, 30, 40) 



r2-r1; 

OffsetRect(£r1, 10,-10); 

lnsetRect(&r2, -5, 5); 

lnsetRect(&M , 15,-15): 
x - EmptyRect(&r2); 
y = EmptyReet(&r1); 



* (10,20) est le coin superieur gauche, 

(30,40) est le coin infeneur droit 'I 
r assignation de structures, copie d'un rectangle dans I autre 
f le coin supeVieur gauche devient (20,1 0), 

le coin infeneur droit (40,30) */ 
f le coi n superieur ga uche devient (5,25), 

le coin inferieur droit (35,35) V 
r les quatre coordonnees sont mises a. z6ro 7 
r x prend la valeur TRUE (rectangle non vide) 7 
/* y prend la valeur FALSE (reclangle vide) 7 
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SectRect 



Figure lit. LI. Union et interaction de deux rectangles. 



Calcu Is sur deux rectangles 

• La procedure UnionRect calcule le plus petit rectangle qui contient chacun des 
deux rectangles dont les pointeurs sont passes en argument. 

• La function SectRect calcule le rectangle intersection des deux rectangles dont les 
pointeurs sont passes en argument, et retourne la valeur TRUE si cette intersection 
est non vide. Si Tintersection est vide, la fonction retourne FALSE et les quatre 
coordonnees du rectangle resultant sont torches a z^ro. 

• La fonction Equal Reel teste si les deux rectangles dont les pointeurs sont passes 
en argument sont Sgaux, c'est-a-dire s'ils ont leur quatre coordonnees egales. Deux 
rectangles de taille identique ne sont pas egaux s'ils sont descales Tun par rapport a 
I'autre. La valeur TRUE est retoumee en cas d'^galite", FALSE sinon. 



Roct M, r2, union, inter; 
int x, y; 

SetRecl{&r1,0, 20, 60, 70): 
SetRect(&r2, 10,0, 120,30); 
LtnlonRect{&r1 , &r2, Sunion); 



x = SeetRect(&r1 , Sr2, Sinter); 



y = Equal Reel (Sunion. Sinter); 



/* quatre rectangles */ 



Tie rectangle union aura: 
(0,0) comma coin superieur gauche et 
(120,70) comme coin inferieur droit V 

f le rectangle mferaura: 
(10.20) comme coin superieur gauche et 
(60,30) comme coin inferieur droit.. . 
x est done non nul (TRUE) */ 

r y est nul (FALSE) 7 



Attention Aucune de ces operations n'entraine d'effet visible a l'ecran. 



Potygone 



On fera toujour* reference k un polygone par l'intenne'diaire d'un handle sur une 
structure k taille variable, dont nous ne donnerons pas la definition exacte. Disons 
simplement que son premier champ (PolySize) est un entier qui contient la taille de la 
structure, en octets, et que le champ suivant (PotyBBox) est un rectangle, le plus petit 
rectangle englobant le polygone. Ensuite sont memorises tous les points constituant 
les sommets du polygone, points sur lesquels une application n'a pas k intervenir 
directement. 
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Un polygone est done une structure de longueur variable. Sa forme sera definie par 
les operations de dessin de lignes (Line et LineTo). Si le dernier sommet ne coincide 
pas avec le premier dans la definition, un c6te supplemental sera genere automati- 
quement. 

La gestion d'un polygone se fait par rintermediaire de trois routines : deux pour la 
constitution du polygone, et une pour sa destruction. 

La fonction OpenPoly cree un nouvel enregistrement de type polygone, I'ouvre 
pour memoriser une definition de polygone et retourne un handle sur cet enregistre- 
ment. Tous les appels suivants de type Line et LineTo (procedures de dessin des 
lignes) seront gardes en memoire pour d6finir la forme du polygone (ils sont rendus 
invisibles par un appel implicite a HidePen), Les cdtes du polygone seront infiniment 
fins, quelles que soient les caracteristiques du crayon employe pour le deenre. 

Attention Un seul polygone peut etre ouvert a la fois. 

La procedure ClosePoly ferme le polygone en cours de definition. Le champ 
PoiyBBox est alors recalcule, de telle sorte que le rectangle contienne tous les 
sommets du polygone. Un appel implicite a ShowPen est effectue, pour retablir le 
precedent niveau d'invisibilite du crayon (voir plus haut). 

Quand on n'a plus besoin d'un polygone, la procedure KUIPoly permet de le 
deuuire et rend disponible la memoire qu'tl occupak. Le polygone est inutihsable 
apres cet appel. 

Exemple Definition et dessin d'un triangle. 

Hsndb triPoly: /* triPoly est un handle sur polygone */ 

triPoly = Op«nPoly( ); f debut de la definition, crayon rendu invisible 7 

MoveTo(30,10); f on se positionne sur le premier sommet */ 

LineTo(40,2Q); F trace du premier cote, non visible a I'ecran */ 

LtneTo(20,20): f trace du deuxieme c6te, non visible a I'ecran */ 

LineTo(30,1Q): /* trace du troisieme cote, non visible a I'ecran */ 

Clos»Poly{ ); T fin de la definition, crayon de nouveau visible */ 

Pa I ntPoly (triPoly); f* triangle pie in dessine a I'ecran 7 

Kill Pol y(tri Poly); C on n'a plus besoin du polygone 7 



Catculs sur polygones 

QuickDraw est pauvre en routines de calcul sur polygone. Une seule est en effet 
disponible : OffsetPoLy qui deplace un polygone sans modifier sa forme ou sa tailie. Le 
displacement horizontal s'effectue de dH pixels (vers la droite si dH est positif , vers la 
gauche sinon), le displacement vertical de dV pixels (vers le bas si dV est positif, vers 
le haut sinon). 

Hands poly: f handle sur polygone */ 

int dH, dV; 

dH = S; I* emplacement horizontal 7 

dV — 10; /" dgplacement vertical 7 

OffsetPoly(poly, dH, dV); P tes composanles du polygone sont modifiees 7 

En pratique, e'est cette pauvrete dans les utilitaires qui fera souvent preMrer 
['utilisation d'une region a celle d'un polygone. 
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Figure ||],14. IMplacemeiil d'un pohfK™e> 



Region 

On fera toujours reference a une region par I'intermediatre d'un handle sur une 
structure a taille variable, dont nous ne donnerons pas la definition. Disons 
simplement que le premier champ (rgnSize) contient la taille exacte de la structure, en 
octets, et que le champ suivant (rgnBBox) est un rectangle, Ic plus petit rectangle 
englobant completement la region. La suite est constitute de donnees definissant la 
forme de la region, sur lesquelles une application n'a pas a intervenir directement. 

Comme pour le polvgone, la region est une structure de longueur variable. Sa 
forme sera definie par 'une serie de lignes et de formes obtenues en utilisant les 
operations de dessin de lignes (Line et LineTo) et de formes (FrameRect, Frame R- 
Rect, FrameOval, FramePoly et FrameRgn) 
Attention Les arcs sont ignore* dans la definition d'une region. 

La region la plus simple est le rectangle. Dans ce cas, la structure a une taille de 
10 octets seulement (pas de donnees additionnelles, seuls les deux premiers champs 
sont presents). 

La gestion d'une region se fait par 1'intermediaire de quatre routines : une pour 
s'allouer un handle, deux pour la constitution de la region, et une pour sa destruction. 
On notera que la maniere retenue pour creer une region differe notablement du 
polygone, meme si les principes de base sont identiques. 

La fonction NewRgn cr£e un nouvel enregistrement de type region et retourne un 
handle. La procedure OpenRgn demarre la memorisation de la definition de la region 
(aucun argument), et e'est a la fin de la definition, quand on ferme par CloseRgn, 
qu'on precise sur quelle region existante elle va s'appliquer. Comme pour les 
polygenes, on n'a pas le droit d'ouvrir plus d'une region a la fois, et le crayon est rendu 
invisible pendant la definition. Le rectangle rgnBBox sera automatiquement recal- 
cute. 

Quand on n'a plus besoin d'une region, on appelle DisposeRgn pour la detruire et 
liberer la memoire qu'elle occupait. La region n'est plus utilisable apres cette 
operation. 
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La creation d'une region ob€it a des regies strictes : a chaque nouvelle instruction, 
on ajoute a I'ancienne region la nouvelle, et on retranche leur intersection. Cette 
propriete permet la creation de « trous » dans les regions. 



(50,50) 



(75,75) 



(225,125) 



ne fait pas partie 
de la region 



f 



(250,150) 



fait partie 
de la region 



Figure 111.15. La region de I'exeinple. 

Exempt* Definition et dessin d'un rectangle evtde. 



Hande rgn; 
Reef r; 



r handle sur region */ 
T un rectangle "I 



rgn ■ NewRgn( ); f obtention d'un handle sur region 7 

OpenRgn( ); f debut de la definition, crayon rendu invisible 7 

SetReet(Sr,50, 50, 250, 150); r le grand rectangle 7 

FrameRect(&r); /* on le trace 7 

lnsetRect(5r, 25, 25); /* le petit rectangle 7 

FrameReet(&r) ; r on fait le trou 7 

CloseRgn(rgn); /* fin de la definition, crayon de nouveau visible 7 



PalntRgn(rgn); 
DlspOSeRgn(rgn); 



r rectangle evide dessine a I'ecran 7 

T on n'a plus besoin de la region 7 



Mise en place de regions particulieres 

• Pour rendre une region vide (e'est-a-dire remettre sa definition a blanc), on peut 
utiliser la procedure SetEmptyRgn. Le handle sur la region reste utilisable. 

• Les deux procedures RectRgn et SetRectRgn font 1'une et 1'autre d'une region 
existante une region en forme de rectangle (si le rectangle est vide, alors la region 
devient vide). La definition de la region precedente est £videmment perdue. 

• La procedure Copy Rgn donne a une region existante la meme forme qu'une autre 
region. II y a copie effective de la definition de la region : les handles sont different s. 
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Attention Dans tous les cas, la region affectee doit exister (done avoir it€ creee par 
NewRgn) . 

Exemple 



Uande rgnl , rgn2; 
Beef r; 

rgnl = NewRgn( ); 
SetRect(8r, 20, SO, 120, 1S0); 
RectRgn(rgn1 , Sr): 
SetEmptyRgii(rgnl); 
SetRectRgn(rgn1 , 20. 50, 120, 1S0); 
ign2 = NewRgn( ); 
CopyRgn[ranl,rgn2); 



T handles sur region */ 
T un rectangle */ 



r creation d'un rectangle 7 

r la region aura la forme du rectangle */ 

f la region est maintenant vide */ 

T on retail difteremment la meme region ' 

T rgrv2 est maintenant identique k rgnl V 



Calculs sur une region 

• La procedure OffsetRgn deplace la region sans affecter sa forme ni sa taille. Le 
displacement horizontal s'effectue de dH pixels (vers la droite si dH est positif , vers la 
gauche sinon), le defacement vertical de dV pixels (vers le bas si dV est positif, vers 
le haut sinon). 



Hands rgn; 
int dH. dV; 



dV-G2; 
OffsetRgn! i 



in.dH.dV); 



f handle sur region 7 



I* deplacement horizontal 7 
r emplacement vertical */ 
f deplacement de la region */ 







insetRgn(rgn,50,-50} 



OffselRgn(rgn,50,62) 



figure 111.16. Wfocmatlon et d*placem«it d'unt region 

* La procedure Inset Rgn agrandit ou retreat une region sans deplacer son centre. 
Toutes les coordonnees definissant la region sont modifies de telle sorte qu'elles se 
rapprochent du centre pour des arguments positifs, s'en eloignent pour des arguments 
negatifs. 
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Hands rgn; 
int dH, dV; 

dH-50; 

dV=-50; 

InsetRgnfrgn, dH, dV); 



f handle sur region 7 



r deformation horizontal '/ 
P d&formation verticals */ 
I* deformation de la region */ 



* La fonction EmptyRgn teste si la region passee en argument est vide, et retourne 
TRUE dans ce cas. 

Attention Aucune de ces operations n'entraine d'effet visible a 1'ecran, le concept 
etant purement mathematique. On remarque que la syntaxe est tdentique a celle 
affectant les rectangles, pourvu qu'on remplace les pointeurs sur rectangle par des 
handles sur region. 



Calculs sur deux regions 



• La procedure UnionRgn calcule t'union des deux regions (la plus petite region 
contenant les deux regions). 

• La procedure SectRgn calcule 1'intersection des deux regions (la plus grande 
region incluse dans les deux regions a la fois). 

• La procedure DiffRgn calcule la difference des deux r6gions (partie de la 
premiere region qui n'appartient pas a la seconde). 

• La procedure XorRgn calcule le « ou exclusif » de deux regions (difference entre 
1'union et rintersection). 



UnionRgn 



SectRgn 





OiffRgn 



XorRgn 



Figure 111.17. Unton, Intersection, difference it«m» Mclusif de deux regions. 

Attention Dans tous les cas, la region resultante doit exister (done avoir €i€ cr£ee 
par NewRgn). Ce pourra etre eventuellement la region vide. Chacune des trois 
procedures admet trois arguments : le handle sur la premiere region, le handle sur la 
seconde region, et le handle sur la region resultante. 
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Handle rgnl , rgn2; I" handles suf region 7 

Hands union, inter, diff, xor; f handles sur region 7 

Ton suppose que rgnl et rgn2 existent deja, on cree les autres V 
union - NewRgn( ); 
inter = NewRgn( ); 
diff = NewHgn( ); 

xor = NewRgn(); . 

UnlonRgn(rgn1 , rgn2, union), r I'urtion de rgnl et rgn2 est mise dans union / 

SectRgn(rgn1 rgn2, inter); /* I - intersection de rgnl et rgn2 est mise dans inter */ 

DiffRgn(rgn1 , rgn2, diff); r la difference rgnl - rgn2 est mise dans diff 7 

XorRgn(rgn1. rgn2, xor); r le ou-exclusif entre rgnl et rgn2 est mis dans xor / 

r on n'a plus besoin des regions resultants 5. on I i be re de la me moire 7 
DlsposeRgn(union); 
DisposeRgn(inter); 
DlsposeRgn(diff); 
DisposeRgn(xnr); 

Notons que de ces quatre procedures de calcul, seule DifTRgn n'admet pas la 
commutativite de ses deux premiers arguments. 

• La fonction EqualRgn teste si les deux regions designees par leur handle sont 
egales (meme forme, meme taille, meme localisation) et retoume TRUE dans ce cas, 
FALSE sinon. Notons que deux regions vides sont egales, puisqu'elles apparatssent 
comme un rectangle dont les quatre coordonnees sont forcees a zero. 

Attention Aucune de ces cinq operations n'entraine d'effet visible a l'ecran. Ce sont 
uniquement des calculs mathematiques. 



Tests d' intersection 

• La fonction PtlnRect teste si le pixel associe au point passe en premier argument 
appartient au rectangle donne en deuxieme argument, et retoume TRUE si out, 
FALSE si non. 

• La fonction PtlnRgn teste si le pixel associe au point en premier argument 
appartient a la region donnee en deuxieme argument, et retoume TRUE si oui, 
FALSE si non. 

• La fonction RectlnRgn teste I'intersection du rectangle et de la region et retoume 
TRUE si au moins un pixel appartient a la fois a l'un et a 1" autre, FALSE sinon. 

Exemple 

Point pt1 , pt2; f deux points 7 

fleet (■; F un rectangle 7 

Handte rgn; f un handle sur region 7 

int x, y, z; 

SetRect(&r, 10, 10,20,20); 

SelPt(&pt1.10, 10); 

SetPt(&pr2, 20, 20); 

x = ptlnRect(&pt1, &r); P x prendra la valeur TRUE (non nul) 7 

y . Pt1nRe«t(&pr2, 4r): r* y prendra la valeur FALSE (nul) 7 

rgn « NewRgn( ); 

RectRgnfrgn, Sr); 

x - PtlnRgn(&pt1 , rgn) : F x prendra la valeur TRUE (non nul) / 

y m ptlnRgn(Spt2, rgn); /* y prendra la valeur FALSE (nul) 7 

z . RectlnRgn(&r, rgn); r z prendra la valeur TRUE (non nul) 7 
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Utilitaires de mise a I'echelle 

II est souvent pratique de pouvoir changer la taille de certains objets en respectant 
une deformation proportion ne lie a la taille de deux rectangles, dits rectangle source et 
rectangle destination. Les cinq procedures suivantes permettent ces changements 
d'echelle. 

• La procedure ScalePt ajuste les coordonnees du point en fonction du ratio des 
dimensions des deux rectangles : 

(nle abscisse) = (anc abscisse) x (largeur destination) / (largeur source) 
(nle ordonnee) = (anc ordonnee) x (hauteur destination) / (hauteur source) 

Cette operation ne tient aucun compte de la localisation de rectangles, au contraire 
des suivantes. 



Point 

Rixt 



pt; 

source, dest; 



r un point V 

r deux rectangles V 



SetReetfasource. GO, 60. £40, 160); 

SetRsct(&dest, 150. 100, 270, 300); 

S»(Pt(&pt, 150. 85); . 

ScatePt(&pt, isourco, &dest): /* pt represente mainlenant fe point (100,170) I 





























s" 


\ 






y 




A 




source 












destination 





Figure 111.19. Ls raise a I'tehelk (procedures Map), 

• La procedure MapPt ajuste la position d'un point du rectangle source au 
rectangle destination. MapRect, MapPoly et MapRgn transforment tous les points 
d'un rectangle, d'un poiygone et d'une region suivant les regies de MapPt. Dans 
1'exemple suivant, 1'abscisse du point engine est exactement au milieu du rectangle 
source et 1'ordonnee au premier quart. Ces proportions sont identiques a I'arnvt-e, 
entre le point recalcul£ et le rectangle destination. 



QUICKDRAW I 85 



Point pt; T un point */ 

Rect source, dest; r deux rectangles 'I 

SetReet(Ssource, 60, 60, 240, 160); 

SetRect(Kdest, 1 50, 100, 270, 300); 

SelPt(8pt, 150, 85); 

MapPt(&pt, Ssource, Sdest); f pt represente maintenant le point (210.150) 7 

Encore une fois, il s'agit la de concepts mathematiques, et ancun effet visible n'est 
a attendre de ces procedures de calcul. 



Calculssurtexte 

Les polices de caracteres pouvant etre a espacement proportionnel, il est 
interessant de savoir calculer la largeur d'un caractere ou d'un ensemble de caracteres. 
Ces calculs sont effectu^s en tenant compte bien Svidemment de la police courante (un 
caractere Chicago est plus large qu'un caractere Times), de la taille courante (la taille 
d^signe la hauteur des caracteres, mais en affecte egalement la largeur) et du style 
courant (un caractere gras est plus large qu'un caractere normal). 

QuickDraw propose deux sortes de routines pour mener a bien ces calculs : quatre 
fonctions permettent de calculer la largeur d'un caractere ou d'une chaine de 
caracteres, quatre procedures permettent de connaitre le rectangle englobant exacte- 
ment le caractere ou la chaine de caracteres designed. 



• CharWidth admet en argument un caractere, StringWidth un pointeur sur une 
chaine de type Pascal, CStringWidth un pointeur sur une chaine de type C et 
Text Width un pointeur sur un ensemble de caracteres ni Pascal ni C suivi du nombre 
de caracteres. Ces quatre fonctions retournent la largeur de I'ensemble des caracteres 
en nombre de pixels. 

int L1, L2, L3, L4; f les quatre resultats 7 

char car - 'A'; /* car est un caractere 7 

char pas[ ] = "\6Pascal"; f pas pointe sur une chains de type Pascal 7 

char Cstr[ ] = "Cstring"; t Cstr pointe sur une chaTne de type C 7 

char text[5] - (T','e','x','t','e'}; P text n'est ni de type Pascal, ni de type C 7 

L1 - CharWidth ((int) car); f largeur du caractere 7 

L2 = StringWidth (pas); f largeur de la chains de type Pascal 7 

L3 ■ CStringWidth(Cstr); /* largeur de la chaine de type C 7 

L4 - T«XtWldth(text, 5) : r largeur du texte 7 



Notons 1'interet de la derniere fonction : pour calculer la largeur occupe"e par les 
vingt premiers caracteres d'une chaine de type C, on proc^dera ainsi : 

int L20; t recevra le resultat 7 

char texte[ ] = "Ceci est une chaine de type C qui depasse vingt caracteres"; 

L2Q ■ Text Width (texte, 20); /* largeur des 20 premiers caracteres 7 



Une chaine de type Pascal se pretera moins facilement S ce genre de calculs, 
puisque suivant sa signification ASCII, son premier element peut creer une largeur 
artificielle qu'il faut eliminer. 
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• Les quatre procedures suivantes sont le pendant des quatre fonctions prec6- 
dentes. CharBounds, StringBounds, CStringBounds et TextBounds admettent cha- 
cune un argument de plus que leur Equivalent : un pointeur sur rectangle. Dans ce 
rectangle sera retoumee la place exacte occupee par le ou les caracteres dEsignes, 
aussi bien en largeur qu'en hauteur. La position du rectangle depend de la position 
courante du crayon. 



Rect r1 . r2, r3, rf; 

CharBounds((int) car, KM): 
String Bound s{pas, 5r2); 
CStringBounda(Cstr, &r3); 
TextBoundsftoxt, 5. &r4); 



r quatre rectangles */ 

r r1 recevra !e re«ultat V 
r r2 recevra le resultat */ 
r r3 recevra !e resultat */ 
r r4 recevra le rtteultat 7 



Ces huit routines seront d'un grand intdret, par exemple pour centrer des textes 
dans des fenetres de visualisation, aussi bien horizon! ale ment que verticalement : 
connaissant le rectangle necessaire a la representation d'un texte, il sera facile 
d'ajuster la localisation du crayon pour centrer ledit rectangle, ainsi qu'on peut le voir 
sur la figure suivante : 



t 

GH 

1 




AVANT 
APRES 


■4*1* 


> 




^ w Texte | Ph 
PL 


4 GL ► 


i 


(GH-PH}/2 

r 


" (GL-PL)/2 


Texte 1 





Figure 111.19, Centrer un texte, 

Dans cette figure, GL et GH designent la largeur et la hauteur du rectangle dans 
lequel le texte doit etre centra. Grice a une procedure de type TextBounds, on peut 
connaitre le rectangle englobant le texte, done sa largeur (PL) et sa hauteur (PH), et 
par un simple calcul de translation, la position relative (x,y) de son coin supErieur 
gauche par rapport a celui du grand rectangle, 

II suffit alors de d^placer la localisation du crayon de la valeur [(GL— PL)/2 - x] 
horizontal em en t, et de [(GH-PH2) - y] verticalement, et de dessiner le texte : il est 
centra ! 
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Tout ceci s'ecrit 



Fleet GR - {50, 60, 280, 160); I* le grand rectangle, defini arbitrairement 7 

char Cstrj ] = Texte"; f chains de type C 7 

Rect r; f rectangle contenant le texte */ 

int x. y, PL, PH, GL, GH; /* les variables de calcul 7 

MoveTo(GR.teft, GR. top) ; f on positionne le crayon 

en hauta gauche du grand rectangle */ 

GL = GR H2 - G R . HI ; r gra nde largeur 7 

GH-GRV2-GR.W; r grande hauteur 7 

CStringBounds(Cstr, &r); f et le petit rectangle V 

x - r.Ht - GR.H1 ; f abscisse relative du coin superieur gauche 7 

y = r _i/i _ gr, vi ; r ordonnee relative du coin supe>ieur gauche 7 

PL - r.H2-t.H1 ; I" petite largeur 7 

PH = r. V2 - r. V1 ; f petite hauteur */ 

Move( (GL - PL) 12 - x, (GH - PH) / 2 - y); r* on change la localisation du crayon 7 

DrawCString(Cstr); f on dessine, e'est central 7 



A aucun moment on n'a besoin de connaltre la localisation exacte du crayon, ni 
meme la position du petit rectangle par rapport a cette localisation. On calcule des 
positions relatives et des deplacements relatits : ces calculs sont done de ported 
general e. 

• Mentionnons pour etre plus complet deux procedures qui out a voir avec le calcul 
sur les textes. Ouand un traitement de texte doit effectuer ce qu'on appelle une 
justification totale (les lignes de texte sont aiignees a la fois sur le bord gauche et le 
bord droit de la feuille), il a deux manieres de faire : soit il augmente I'espace entre 
chaque mot, soit il augmente I'espace entre chaque lettre. QuickDraw propose une 
procedure pour chacune des deux solutions : SetSpaceExtra permet d'augmenter 
I'espace entre les mots et SctCharExtra celui entre les lettres, ainsi que deux fonctions 
pour connaltre la valeur courante de chacim de ces champs : GetSpaceExtra et 
GetCharExtra. Notre but n'etant pas d'ecrire un traitement de texte, nous ne 
developperons pas davantage la question. 



DESSINER AVEC QUICKDRAW 

Apres avoir passe en revue tous les concepts math^matiques et graphiques de 
QuickDraw, il est sans doute temps de voir comment on peut dessiner ! Rappelons 
une demiere fois quelques elements de base : on dessine exclusivement dans le 
grafport courant, a l'intersection de deux rectangles (le rectangle frontiere de la pixel 
map et le PoriRect du grafport) et de deux regions (la clip region et la region visible). 

II faudra toujours garder a l'esprit quand on dessine qu'un pixel ne represente pas 
quelque chose de carre a l'ecran (contrairement au Macintosh) : le ratio hauteur d'un 
pixel/largeur d'un pixel est de 6 sur 5 en mode 320, et de 12 sur 5 en mode 640. II 
faudra en tenir compte (par exemple dans la taille du crayon) pour dessiner les traits 
verticaux de la meme epaisseur que les traits horizonfaux. 
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DESSIN DE FORMES 



Dessin de lignes 

Deux procedures permettent de dessiner une ligne, plus precisement, un segment 
de droite. L'origine du segment est la localisation courante du crayon. Avec LineTo, 
1'autre extremite du segment est defmie en absolu (coordonnees locales), avec Line, 
en relatif. Si nous supposons que le crayon se trouve sur le point de coordonnees 
(20,30), les deux instructions suivantes sont equivalentes : 



LineTo(60,80); 

f ou V 
Line(40,50); 



T on va en absolu jusqu'au point {60,80} */ 

f on va en relatif jusqu'au point (20+40,30+50) */ 






et 

du c 



■Hern 
taille 
crayon 



la ligne 
mathematique 



I 




Figure HI .20. Dessin de deux Lignes. 

Dans les deux cas, la localisation du crayon est modifiee, 1'autre extremite du 
segment devenant la nouvelle localisation (revoir comment a ete defini le triangle dans 
le paragraphe consacre a la definition des polygones, plus haut). 

La ligne est dessinee avec les caracteristiques du crayon : taille, pattern, masque, 
mode de transfert. Pour un point donne\ c'est un rectangle de pixels situe vers le bas et 
vers la droite de ce point qui est dessine. 



Dessin de rectangles 

Cinq procedures permettent de dessiner graphiquement des rectangles. Nous 
retrouverons a 1'identique ces cinq procedures pour dessiner les autres formes etudiees 
dans les parties precede ntes. 

FrameRect dessine uniquement le contour du rectangle, en utilisant les caracteristi- 
ques du crayon (taille, pattern, masque et mode). Tous les pixels dessines sont 
interieurs au rectangle, meme si la taille du crayon est superieure a (1,1). 

PaintRect dessine le contenu de la forme rectangulaire avec le pattern du crayon 
(limite a son masque) comme motif de remplissage et le mode du crayon comme mode 
de transfert, ce qui signifie que Funiformite du remplissage peut etre affectee par le 
fond sur lequel on dessine. 

EraseRect « efface » le contenu de la forme rectangulaire, c'est-a-dire la remplit 
avec le pattern de fond (que nous avons appele bkPat) sans masque et en mode Copy. 
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Le rectangle 

mathematique : 

ce trait n'est 

pas dessine 



FrameRect 



PaintRect 

FillRect 



EraseRect 



Figure 111.21. Desslns de rectangles. 

InvertRert « inverse » le eontenu de la forme rectangulaire. Cette inversion se fait 
au niveau du bit, ce qui signifie que la couleur devient 15, la couleur 1 devient 14, a 
couleur 2 devient 13, etc. Avec la palette standard en mode 320 (voir plus naut), e 
noir devient blanc, le gris fonce devient gris clair, le brun devient bleu pervencne, le 
pourpre devient lilas, "le bleu devient bleu clair, le vert fonce devient vert 1 orange 
devient jaune et le rouge devient chair. Et reciproquement. Ce qui confirme le fait que 
cette palette de couleurs n'a pas 6:6 choisie au hasard. 

FillRecl remplit le eontenu de la forme rectangulaire par un pattern dSsigne en 
argument Le mode utilise est Copy, ce qui signifie que 1'uniformite du remphssage ne 
sera pas affectee par le fond sur lequel on dessine. Fonctionnellement, FUIRect agit 
comme EraseRect, avec un pattern different. 

L'emploi de ces procedures est ultra -simple. Les quatre premieres n'utilisent qu'un 
argument : un pointeur sur le rectangle a representer. FiURect utilise un deuxieme 




Figure 111.22. Inversion du rectangle. 



90 I BOlTE A OUTILS DE V APPLE IIGS 



argument : un poiriteur sur le pattern qui servira de motif de remplissage. Ces cinq 
procedures ont un effet immgdiat a 1'ecran. 

Notons qu'aucune de ces procedures n'affecte la localisation du crayon. 



™s®i 



patl p»t2 |,^;;- 



Figure 1I1.2J. Dtssins avec reetanslw. 



Exemple 



Rect 
char 



patl [32]. pat2[32]; 



P un rectangle 7 
r et deux patterns 7 



SetRectf&r, SO, 50, 1 50, 100) 



/* definition du rectangle */ 

r definition des patterns, voir plus haul 7 

SetPenPat(pat1 ); f on fixe le pattern du crayon 7 

SetPenSlze(1 0, 6); C et sa taillo 7 

r les autres earacteristiques sent celies du grafport courant 7 
r d ess in du cadre 7 
I" retr6cissement du rectangle 7 
r on remplit le nouveau rectangle 7 
C nouveau rectangle */ 
t inversion de ce rectangle 7 
T rStr^cissement du rectangle */ 
T effacement de son contenu 7 
r on change le pattern du crayon: couleur noire 7 
r on relr6cit encore le rectangle 7 
f on remplit son contenu 7 



FrameRectf&r); 
lnsetRect(&r, 5, 3); 
FIIIRect(&r,pat2); 
SetRect(&r, 75,40, 125. 110) 
lrwertRect(&r), 
lnsetRect(&r, 20, 30); 
EraaeRect(&r); 
SetSolldPenPat(Q); 
lnsetRect(2, 2); 
PaintRectf&r) 



r etvoila le resultat (figure III.23) 7 



Au risque de se repeter, precisons qu'aucune de ces procedures ne dessine en 
dehors du rectangle d&iigne. Si le rectangle a pour taille m x n points, tl englobe 
(m-1) x (n-1) pixels et les procedures n'en affectent pas un de plus. 
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Figure HI. 2-1 l,*s pixels d\m rectangle 



Dessin de rectangles arrondis 



Les cinq procedures vues pour le rectangle s'appliquent a l'identique pour le 
rectangle arrondi. Elles s'appellent FrameRRect, PaintRRect, EraseRRect, InvertR- 
Rect et FiliRRect. Elles admettent trois arguments a la place du simple pointeur sur 
rectangle des procedures vues prec£demment : un pointeur sur le rectangle qui 
englobe le rectangle arrondi, un diametre de courbure horizontal et un diametre de 
courbure vertical qui deTinissent les arrondis. FiliRRect admet bien sur en quatrieme 
argument un pointeur sur pattern. 

FrameRRect (&r, dH, dV) oil r est un rectangle et dH et dV des entiers dessinera le 
contour du rectangle arrondi de la figure III. 25. II faut bien remarquer qu'aucune des 
cinq procedures ne dessine un pixel a l'exterieur du rectangle arrondi ni ne modifie la 
localisation du crayon. 

Voir un exemple d'utilisation en tin de chapitre V, ainsi que pour les autres types 
de formes element aires. 




•dH 



^D 




* 




rectangle englobant 
le rectangle arrondi 



dH = courbure horizontals 
dV ■ courbure verticals 



Figure 111*25. Les elements CDnstltuant le rectangle arrondi. 
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rectangle englobant I'ellipse 





Figure 111.26. I.'ellipw rat parfaitcmenl dermic p»r It rectangle circonscrit. 



Dessin d' ellipses 

Les cinq procedures vues pour le rectangle s'appliquent pour I'ellipse, et emploient 
les memes arguments. Le rectangle circonscrit definit parfaitement I'ellipse. Les 
procedures s'appelient FrameOvaJ, PaintOval, EraseOval, InvertOal et FillOval. La 
encore, aucun pixel n'est dessine en dehors de I'ellipse, et la localisation du crayon 
n'est pas affectee. 



Dessin d'arcs 



Un arc est une portion d'ellipse. Four definir cette portion, il faut ['ellipse, done le 
rectangle circonscrit, et deux angles detimitant la portion. On notera la maniere dont 
QuickDraw calcule ces angles, par reference au rectangle qui englobe le tout. 
L'origine de ces angles est I'axe vertical dirige vers le haut (midi) et les angles positifs 
se calculent dans le sens des aiguilles d'une montre, Tous les angles sont donnes en 
degr£s et trails modulo 360. 



La encore, les cinq procedures existent. Elles s'appelient FrameArc, PainlAre, 
EraseArc, InvertArc et FillArc Trois arguments : pointeur sur rectangle, angle de 
debut et angle de 1'arc au lieu du seul pointeur sur rectangle des procedures 
precedences. Ces procedures n'affectent pas la localisation du crayon. 



Rappelons une petite particularity : la procedure FrameArc n'a aucune influence 
sur la constitution d'une region. En d'autres termes, il est impossible d'inclure un arc 
dans la definition des regions. 
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r1 r2- 

FrameArc(&M ,45,90) FrameArc(&r2, 45,90) 



figure 111.27. Les angles sont calculi par rt'ftrenre nil rectangle cireanscrit. 



Dessinde regions 

Une region une fois definie, elle peut etre dessinee comme toutes les formes 
elementaires, et on retrouve egalement ici les cinq procedures de dessin. L'argument 
principal n'est plus un pointeur sur rectangle ntais un handle sur region. L'utilisation 
est parfaitement identique. Ces procedures se nomment FrameRgn, PaintRgn, 
EraseRgn, InvertRgn et FillRgn. 

Id encore, ces procedures n'affectent que les pixels intirieurs a la region designee, 
et notamment FrameRgn, quelle que soit la taille du crayon. Elles n'affectent pas sa 
localisation. 



Dessin de polygones 

Pas de surprise en ce qui concerne les polygones, les cinq procedures sont la : 
FramePolj, PaintPoly, Erase Poly. InvertPoly et Fill Poly admettent comme argument 
essentiel un handle sur polygone. 

II faut cependant noter une difference fondamentale avec les autres procedures de 
ce type, liee a la definition intrinseque des polygones. Le polygone est constitue de 
lignes, et FramePoly ne fait que dessiner des lignes, de la facpn vue plus haut. Les 
pixels sont done traces pour partie exterieurement au polygone. La localisation du 
crayon change a chaque ligne dessinee, mais pas globalement, puisque le dernier point 
coincide avec le premier. 



DESSIN DETEXTES 



Les routines de calculs sur texte allaient quatre par quatre, il en est de meme des 
procedures de dessin de texte. Pour dessiner un caractere, on utilisera Draw Char 
Pour dessiner une chaine de type Pascal, on utilisera Drawstring. Pour dessiner une 
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chaine de type C, on utilisera DrawCString. Enfin pour dessiner une chaine de 
caracteres ni Pascal ni C, on utilisera DrawText (en preeisant le nombre de caracteres 
qu'elle contient), 

Toutes ces procedures utilisent evidemment les caracteristiques du grafport 
courant attaches au dessin de texte. Elles affectent toutes la localisation du crayon, 
de telle sorte qu'il se positionne pour dessiner la chaine suivante. En aucun cas Tune 
de ces procedures n'est capable d'ecrire sur plusieurs lignes. C'est a 1'application de 
gerer la mise en page, par des Move ou des MoveTo approprtes. 

char car - TV; C car est un caractere */ 

char pas[ ] = ^6Pasca1": f pas points sur une chaine de type Pascal 'I 

char lexte[ J ■ "Ceci est une chaine de type C qui d^ passe vingt caracteres"; 

MoveToj 1 0. 1 0) ; f on positionne le crayon 7 

DrawChar((int) car); f on dessine le caractere V 

Move(5,0); /* on laisse un peu d'espace 'I 

DrawString(pas); r on dessine la chaine de type Pascal */ 

MoveTo(1 0,30): f on positionne le crayon plus bas 'I 

DrawCStrlng(taxte) ; f on dessine la chaine de type C V 

MoveToCIO.SO); /* on positionne le crayon plus bas V 

DrawText( texte. 20); Ton dessine les 20 premiers caracteres seulement */ 

A Tissue de cet exemple, on aura trots lignes de texts cadr^es a gauche dans le 
grafport courant. Voir les chapitres X et XII pour d'autres exemples. 



PICTURE 



Constitution de pictures 

Nous avons vu plus haut sur quels prineipes repose la picture. Nous allons voir, 
maintenant que nous savons dessiner des formes elementaires et du texte, comment 
creer une picture. Attention, la version 1.02 de QuickDraw ne connaissant pas encore 
les pictures, tout ce qui est dit ici est sujet a modifications. C'est toutefois ainsi que 
cela fonctionne sur Macintosh, et il serait etonnant que cela change ! 

Une picture sera m£moris£e dans une structure a taille variable, et toujours 
designee par rinterm^diaire d'un handle sur cette structure, dont nous ne donnerons 
pas la definition exacte. Le premier champ (picSize) contient la taille exacte de la 
structure des octets. Le deuxieme champ (picFrame) est un rectangle, le plus petit 
rectangle englobant la picture. On trouvera ensuite les donn6es constitutives de la 
picture proprement dite, suivant une codification QuickDraw. 

La gestion d'une picture se fait par T intermedial re de trois routines : une pour 
s'allouer un handle et ouvrir le mode definition, une pour fermer le mode definition et 
une pour sa destruction. On notera que la maniere retenue pour g£rer une picture est 
identique a la gestion du polygone. 

La fonction OpenPicture retoume un handle sur la nouvelle picture. En argument, 
un pointeur sur rectangle qui representee le cadre de la picture. La fonction appelle 
HidePcn, done plus rien ne sera dessine a 1'ecran a partir de ce moment. A la place, 
tout appel a une procedure de dessin (dessin de forme ou dessin de texte) sera 
memorise suivant un code propre a QuickDraw et entrera dans la definition de la 
picture. 

L'enregistrement de la picture se termine par l'appel de la procedure OosePicture. 
Cette procedure retablit le niveau d'invisibilite du crayon en appelant ShowPen. 
Comme pour les polygenes et les regions, on n'a pas le droit d'ouvrir plus d'une 
picture a la fois. 
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Quand on n'a plus besom d'une picture, on appelle KlllPicture pour la detruire et 
liberer la memoire qu'elle occupait. La picture n'est plus utilisable apres cette 
operation. 

Nous passons volontairement sous silence La possibility qu'offre QuickDraw de 
glisser des comment aires au milieu de la definition des pictures, putsque dans son 
mode de fonctionnement standard, il n'en tient pas compte. Cet aspect est a reserver 
aux programmeurs de niveau avance\ 

A titre d'exemple, creons une picture qui dessinera le drapeau de la Croix-Rouge 
en mode 320. 

Hantfe croix; f handle sur picture 7 

flgcl M, r2; I" deux rectangles */ 

char rouge[32]; f place pour un pattern an mode 320 */ 

SolldPattem(rouge, 7); !" I'entree 7 est la couleur rouge dans la palette standard V 

SelR«ct(Br1,0,0, 100, 100): 

croix - OpenPlcture(&r1 ); f debut de definition */ 

PenNormal(); 

Fram«Rect(4r1): 

SetRect(&r2. 30. 1 0, 70, 90) ; 

FIIIRect(5r2, rouge); 

SetRecl(&r2, 10,30,90.70): 

FIIIReet(&r2, rouge). 
ClosePlclure( }; r fin de definition */ 

Off setRect(Sr1 . 30, 30); 

DrawPlcture(croix, &r1); /* dessin sans mise a I'echelle V 

lnaelRect(&r1 , 30,30); 
OffsetRect(&r1,0,70); 

DrawPlcture(croix, &r1): f dessin avec mise a I'echelle */ 

KillPlcture(croix); f on n'a plus besoin de la picture V 



Representation de pictures 

Nous avons vu comment enregistrer les elements constitutifs d'une picture. II ne 
reste plus qu'a les faire apparaitre a I'ecran. Pour ce faire, une procedure unique : 
Draw Picture, qui permet non seulement la representation d'une picture, mats aussi sa 
mise a I'echelle. 

DrawPicture admet deux arguments. Le premier est un handle sur la picture a 
representee Le second est un pointeur sur le rectangle de destination dans lequel la 
picture va etre representee. Nous avons vu que la definition de la picture retient la 
notion de rectangle englobant celle-ci. Si le rectangle de destination a meme taille que 
le rectangle circonscrit. pas de probleme : la picture est dessinee sans deformation. 
Sinon, il y a mise a I'echelle, ce qui peut conduire a des resultats fort decevants, 
QuickDraw faisant du mieux qu'il peut. Le resultat sera excellent sur les elements 
constitutifs du type appels de dessin de formes vus ci-dessus {voir exemple), mais 
heaucoup moins bon sur les memorisations de type pixel map, Dans ce dernier cas, la 
mise a I'echelle est d'autant meilleure que les dimensions des deux rectangles sont des 
multiples exacts les unes des autres. 



TRANSFERTDE PIXELS 

Trois procedures gerent ce que nous appellerons un transfert de pixels, c'est-a-dire 
le deplacement d'un groupe designe de pixels d'un endroit a 1'autre. 
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Figure 111.29. La procedure ScrollRcci. 
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Transfert dans le meme grafport 

La procedure ScrollRccl permet de translates tous les pixels d'un rectangle d'une 
distance horizontale et verticale a definir. Exemple d'utilisation ; 

Reel r; f un rectangle 7 

int dH, dV; F deux entiers V 

Hands upd; /* handle sur region V 

upd m NewRgnf ); f allocation d'un handle sur region 7 

GetPortRect(Sr); f le rectangle sera le PortRect du grafport 7 

dH a -1 0; f deplacement de 1 vers la gauche 7 

dV - 1 0; f deplacement de 1 vers le bas */ 

ScrolIRect(&», dH, dV, upd): f on etfectue to deplacement V 

DisposeRgn(upd); r on n'a plus besoin de la region 7 



La region designee par le handle upd est celle qui va apparaitre apres le 
deplacement des pixels. Cette region, geree de maniere interne, sera remplie par le 
pattern de fond du grafport (bkPat). Les deplacements positifs s'effectuent vers la 
droite et vers le bas. Les pixels qui sortent du rectangle sont perdus. Notons que le 
transfert est limite a la region habituelle de dessin {intersection des deux rectangles et 
des deux regions qui limitent Taction de dessiner). 

On verra en fin de chapitre XI un exemple concret d'utilisation de cette procedure. 



Transfert sans reference a un grafport 

La procedure FaintPixels transfere une pixel map d'une structure Loclnfo a une 
autre structure Loclnfo, sans reference aucune au grafport courant. Le mode de 
transfert est choisi dans l'appel de la procedure {les huit modes « normaux » sont 
permis). Deux rectangles sont egalement a definir : un rectangle dans la structure 
d'origine, qui delimite la partie de la pixel image a transferer, et un rectangle dans la 
structure receptrice : le rectangle d'arrivee n'est pas de la meme taille que le rectangle 
d'origine, il y aura mise a Teehelle de l'image transferee {avec des resultats plus ou 
moins bons visuellement). Le transfert peut etre limits a une partie seulement de la 
pixel map par definition d'une region masque (une clip region particulate) dans la 
structure receptrice. 



PaintPixels n'admet qu'un argument : un pointeur sur une structure qui contient en 
fait les veritables arguments de la procedure. Cette structure contient les six elements 
suivants : 

- un pointeur sur la structure Loclnfo d'origine ; 

- un pointeur sur la structure Loclnfo receptrice ; 

- un pointeur sur le rectangle source ; 

- un pointeur sur le rectangle de destination ; 

- le mode de transfert (dans un entier sur 16 bits) ; 

- un handle sur la region masque, 

Rappelons que le rectangle frontiere d'une structure Loclnfo delimit un systeme de 
coordortnees. Le rectangle source sera defini dans le systeme de la Loclnfo d'origine, 
le rectangle de destination et la region masque seront definis dans le systeme de la 
Loclnfo receptrice. 

Pour ne pas utiliser de region masque, mettre zero-long en guise de handle. 
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Transfert vers le graf port courant 

Dans certaines applications, on n"a pas forcdment envie d'ex£cuter ses dessins 
directement a I'ecran : on peut preferer dessiner en dehors de I'ecran, done de 
maniere invisible, et faire apparaitre la totalite du dessin d'un coup, Dans les 
animations graphiques, par exemple, on prepare 1'image suivante hors ecran, et elle 
vient remplacer la preeddente en une copie instantanee vers la memoire ecran. 

Pour copier une pixel map dans le grafport courant, on utilisera la procedure 
PPToPort. L'avantage de cette procedure sur PaintPixels est qu'elle respecte la clip 
region et la region visible du grafport courant, autrement dit qu'elle ne risque pas de 
dessiner dans la partie invisible d'une fen£tre, par exemple. 

PPToPort utilise cinq arguments : 

- un pointeur sur la structure Loclnfo d'origine ; 

- un pointeur sur le rectangle source ; 

- l'abscisse du coin superieur gauche du rectangle destination ; 

- l'ordonnee du coin supeneur gauche du rectangle destination ; 

- le mode de transfert (entier sur 16 bits). 

On constate que le rectangle de destination n'est pas precis : seul son coin 
superieur gauche doit etre fourni. Cela signifie que contrairement a PaintPixels, 
PPToPort ne permet pas la mise a I'echelle des pixels transferees (le rectangle 
destination a la meme taille que le rectangle origine). De me me, pas de region 
masque, puisque nous savons qu'implicitement, l'intersection de la clip region et de la 
region visible servira de masque. 

A ces differences pres, PPToPort et PaintPixels fonctionnent de maniere identique. 



COULEUR D'UN PIXEL 

II est possible de connaitre (mais indirectement) la couleur du pixel associg a un 
point determine, grace a la fonction GetPfcel. On passe en argument l'abscisse et 
l'ordonnfie du point (coordonnees locales), et la fonction retourne le contenu 
definissant le pixel (dans les deux ou quatre bits bas de 1'entier resultant). L'exemple 
suivant utilise GetMouse, une procedure de l'Event Manager qui permet de r£cup6rer, 
justement en coordonnees locales, le point ou se trouve la souris. 

inl num. scb, col: 
Point pt; 

GetMouse(Spt); r voir l'Event Manager 7 

num ■ GetPixel(pt.H. pt. V) ; /* entree dans la table de couleurs utilisee */ 

LocalToGlobal(apl); /* le point est trad u it en coordonnees glo bales */ 

scb > GetSCB(pt. V) ; f le SCB dont il depend V 

col - GetColorEntryfscb & 0x000 F, num & 0x000 F); f la couleur exacte 7 



Dans l'exemple precedent, un petit exercice de style : nous sommes en mode 320 et 
nous souhaitons connaitre la couleur exacte d'un pixel (et pas seulement son numdro 
d' entree dans la table des couleurs dont il depend). Pour ce faire, on traduit ses 
coordonndes locales en coordonnees globales, ce qui nous permet de connaitre la ligne 
d' Scran a laquelle il appartient, done le SCB dont il depend, done la table de couleurs 
associee, Connaissant 1'entree dans la table de couleurs, on en deduit facilement la 
couleur exacte (en niveaux de rouge, de vert et de bleu). 
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GESTION DU CURSEUR 

Nous avons vu plus haut comment une application pouvait d£finsr un curseur. Le 
curseur sera gere par 1 'intermedial re d'un pointeur sur la structure Cursor (ou par une 
chaine d'entiers sur 8 bits non structuree). 

• Au debut de 1 'application, on commence par initialiser le curseur avec la 
procedure InitCursor, Un curseur en forme de fleche (toute noire) devient visible et 
suit les mouvements de la souris. 

• Pour modifier le dessin du curseur utilise, on emploiera la procedure SeiCursor, 
1'argument disignant le nouveau curseur (par son adresse). 

• Pour connaitre 1'adresse de la description du curseur en cours d'utilisation, on se 
servira de la fonction GetCursorAdr. 

Dans 1'exemple qui suit, on change momentanement de curseur, puis on retabht 
celui d'origine. 

Pointer arrow; f pointeur sur curseur 7 

Cursor croix - ( 

5 p r hauteur de I Image (nombre de lignes) V 

3, r largeur de I'image (nombre de mots, done 6 octets) 7 

{ T image du curseur 7 

{ Ox 00, Ox F0, 0x00 ,0x00,0x00.0x00 }, 

( OxOO.OxFO.OxOO.OxOO.OxOO.OxOO J, 

( OxFF,0xFF,0xF0,0xO0,0xO0.Ox00 ), 

f OxOO.OxFO.OxOO.OxOO, 0x00,0x00 }, 

( OxOO.OxFO, 0x00, 0x00,0x00.0x00 j 

j /* image du masque 7 

{0,0,0.0.0,0}, 

{ 0, 0, 0, 0, 0, }, 

{ 0, 0, 0. 0. 0. }, 

j O, 0, 0, 0, 0. ), 

(0.0.0,0,0,0) 

2,2 r coordonnees du point chaud 7 

}: 

tnltCursorf ); /* curseur en fof me de Heche 7 

arrow = GetCursorAdr^ ): Ton garde son adresse 7 

SetCursor(& croix); r* curseur en forme de croix */ 

SetCursor(arrow); /* on retablit la fleche 7 



• Tout comme le crayon, le curseur possede un niveau d'invisibilite. Le niveau zero 
signifie que le curseur est visible (InitCursor initialise le niveau a zero). La procedure 
HideCursor d^cremente le niveau d'une unite\ tandis que ShowCursor 1'incremente. 
Ces deux procedures devraient toujours etre utilises conjointement, comme une 
accolade ouvrante et une accolade fermante. 

HideCursor( ); r normalement, le curseur devient invisible 7 

ShowCursor( ); /* normalement, le curseur redevient visible 7 

• La procedure ObscureCursor (sans argument) rend le curseur invisible jusqu'au 
prochain mouvement de la souris. Cette procedure est tres pratique pour les 
applications a I'intgrieur desquelles 1'utilisateur doit entrer du texte par l'interm£diaire 
du clavier (editeurs de textes, traitements de textes, etc.) : des qu'il commence a 
taper, le curseur disparait, et reapparait des qu'il louche k la souris. 



CHAPITRE IV 



EVENT MANAGER 



PRINCIPESGENERAUX 

Ceux qui n'ont jamais programme sur Macintosh seront peut-£tre surpris de la 
logique de programmation sur 1'AppIe IIGS, qui est absolument identique : une 
application est piloted par des evenements (event driven, comme disent les ameri- 
cains), ce qui se traduit par une structure de programme tres particuliere. Le cceur 
d'une application est une boude qui attend sans cesse le prochain £v£nement, et qui 
appelle des procedures adaptees au traitement de chacun de ces evenements. 

Fini les programmes lineaires qui s'organisent en menus successifs et hierarchi- 
ques : la boucle d 'evenements n'impose aucune hierarchie dans les demandes de 
1'utilisateur, 1'application doit etre prete a tout instant a rdpondre a n'importe quelle 
sol I i citation exteneure. 

Mais qu'entend-on au juste par evenement ? Quand 1'utilisateur enfonce le bouton 
de la souris oil une touche du clavier, il declenehe un mecanisme qui permet a TEvent 
Manager, le gestionnaire des evenements, de deiecter une telle action et d'en 
determiner les caractfiristiques, qu'il pourra transmettre a ['application pour que celle- 
ci puisse y repondre, 

Les evenements sont nombreux et varies, ils ne sont pas tous le fait de 1'utilisateur. 
Dans ce chapitre, nous etudierons les prineipaux types d' evenements, et la maniere 
dont ['application devrait en tenir compte. 



UTILISATION DE L'EVENT MANAGER 
Divers types d 'evenements 

• fivenements de type souris 

II y a deux types d'evenements li£s a la souris. Quand le bouton de la souris est 
enfonce, un eve'nement de type MouseDown est gen£r£ ; quand le bouton de la souris 
est relache, on a un evenement de type MouseUp. La simple action de faire glisser la 
souris pour deplacer le pointeur a 1'ecran ne constitue pas un evenement. Seule 
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1'action sur Le bouton en genere, et les genere par paires, sauf casparticuliers (le 
Window Manager par exemple empeche I'evenement MouseUp d'etre rapportd & 
1' application quand le bouton de la souris est relach£ apres avoir etc enfonce dans un 
controle de fenetre). 

Plusieurs informations sont li^es a un evenement de type souris : 

- le lieu oii se trouvait le pointeur quand I'evenement s'est produit ; 

- la date relative a laquelle I'evenement s'est produit ; 

- les touches de modification enfoncees a ce moment precis ; 

- le numero du bouton incrimine (il n'y a qu'un bouton sur la souris, mais d'autres 
materiels sont utilisables, et l'Event Manager sait gerer deux boutons au maximum), 

• £venements de type clavier 

11 y a deux types d'evenements lies au clavier. Quand une touche normale est 
enfoncee, un evenement de type Key Down est genere. Par touche normale, nous 
entendons toutes les touches du clavier (normal ou numerique) a ['exception des cinq 
touches qui modifient son comportement : Majuscule, Blocage -Majuscule, Controle, 
Option et Pomme (Commande ou Pomme ouverte, c'est la meme chose). 

Attention L'enfoncement d'une combinaison quelconque des touches de modification 
sans l'enfoncement simultane d'une touche normale ne genere aucun evenement. 

Quand une touche normale est gardee enfoncee, des evenements de type AutoKey 
sont generis periodiquement. Le delai de repetition et la vitesse de repetition sont des 
parametres que 1'utilisateur peut rigler grace a 1'accessoire de bureau Tableau de 
Bord. 

Notons qu' aucun evenement n'est genere quand la touche est relachee. 

Plusieurs informations sont liees a un Evenement de type clavier : 

- la date relative a laquelle I'evenement s'est produit ; 

- les touches de modification enfoncees a ce moment precis ; 

- le code ASCII du caractere correspondant a la touche enfoncee (les touches de 
modification ayant une influence sur cette information sont prises en compte). 

• Evenements de type fenetre 

Deux types d'evenements sont g6ner£s par le Window Manager : les evenements 
d'activation et de deactivation des fenetres (activate event), et les evenements de mise 
a jour (update event). Ces types d'evenements sont etudies en detail dans le chapitre V 

• Autres types d'evenements 

Plusieurs types d'evenements completent la panoplie de l'Event Manager. Certains 
pourront etre ignores dans une premiere approche. 

- device driver event : certains controleurs de periph£riques peuvent generer des 
evenements ; 

- application events : une application peut definir pour ses besoins propres jusqu'a 
quatre types d'evenements. A elle de les gerer completement ; 

- switch event : le bouton de la souris a ete enfonce dans le controle de 
commutation d' applications. Cet evenement est genere par le Control Manager : 
1'utilisateur souhaite changer d'application courante. 

Remarque Au moment oil nous ecrivons, nous ne savons pas si cet evenement sera un 
jour genere par le Control Manager. II faut done considerer tout ce qui est dit par la 
suite concern ant ce type d 'evenement comme theorique. 

- desk accessory event : une oombinaison particulate de touches (Controle - 
Pomme - Escape) a ete enfoncee, invoquant I'utilisation des accessoires de bureau 
classiques (voir le chapitre X). 
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• Evenement nul 

Quand I'Event Manager n'a pas d'autre evenement a rapporter, il genere un 
evenement factice, dit null event. Cet evenement nu] apporte plusieurs informations, 
qui peuvent servir dans certains cas precis : 

- le lieu oil se trouvait le pointeur quand 1'evenement s'est produit ; 

- la date relative a laquelle 1'evenement s'est produit ; 

- les touches de modification enfoncees a ce moment precis. 



Priority d'evenements 

Au fur et a mesure de leur generation, la plupart des evenements sont stockes dans 
une file d'evenements (event queue), dans un ordre chronologique. C'est notamment 
dans cette file que 1'application ira chercher les evenements qu'elle aura a trailer, 
eventuellement en seiectionnant certains d'entre eux. 

Tous les types d'evenements n'ont pas le meme niveau de priority. L'ordre est le 
suivant : 

1. activate event (deactivation puis activation) ; 

2. switch event , 

3. evenements de type souris, de type clavier, device driver event, application 
events, desk accessory event (dans l'ordre chronologique) ; 

4. update event. 

Les evenements d'activation de fenetres sont tellement prioritaires qu'ils n'entrent 
meme pas dans la file d'evenements. lis sont delectus par un mecanisme special du 
Window Manager et pris en compte immediatement. 

De meme, le switch n'est pas poste dans la file et est pris en compte d£s qu'il n'y a 
plus d'evenement d'activation en cours. II rend alors prioritaire les eventuels 
Evenements de mise a jour de fenetre, tous executes avant que la commutation 
d'application n'intervienne, 

Les Evenements de la categorie 3 sont les seuls a entrer reellement dans la file, lis 
sont pris en compte dans l'ordre oil ils y sont entr£s (premier entre\ premier sorti), 
done dans l'ordre chronologique de leur generation. 

Les evenements de mise a jour sont traites en dernier, quand aucun evenement 
plus prioritaire n'est en attente. Comme les evenements d'activation, ils sont detectls 
par un mecanisme special du Window Manager et n'entrent pas dans la file. 

Quand il n'y a plus aucun evenement en suspens, I'Event Manager retoume un 
evenement nul, signifiant a ['application qu'elle n'a rien de special a faire. 

Remarque La file d'evenements a une taille limitee, determinee au moment de 
['initialisation de I'Event Manager. Que se passe-til quand cette file est pleine, s'il 
rentre un evenement supplemental ? Dans ce cas, c'est 1'evenement le plus ancien 
qui est perdu corps et bien. II n'aura jamais ete traite. 



Structure d' evenements et definition de constantes 

Les evenements sont manipules au travers d'une structure particuliere appelee 
Event record, dont voici les composantes : 
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long 
long 
long 



what; 
message ; 
when ; 
where ; 
modifiers ; 



r code de I'evenement */ 

T contenu variable en fonction du code 6venement */ 

r date relative de I'evenement 7 

r endroit ou la sours pointait lots de I'ev4nement 7 

f quelles touches de modifi cation etaient enfoncees 7 



A cette structure, suffisante pour la seule utilisation de I'Event Manager, nous 
prefererons immediatement celle de Task record, indispensable des que I'application 
manipulera des menus deroulants ou battra au rythme cardiaque de la fonction 
TaskMaster. En voici la definition : 



struct _TaskRec { 


int 


what ; 


long 


message ; 


long 


when ; 


long 


where ; 


int 


modifiers ; 


long 


TaskData : 


long 


TaskMask 



r code de I'evenement 7 

T contenu variable en fonction du code ev^nement 7 

r date relative de I'evenement 7 

r endroit ou la souris pointait lors de I'evenement 7 

f quelles touches de modification etaient enfoncees 7 

T donnees additionnelles 7 

r masque pour I'utilisation de TaskMaster 7 

}; 

fldefine TaskRec struct _TaskRec 

Remarquons dans cette structure que nous avons defini le champ where comme un 
entier long plutot que comme un point. II faudra en tenir compte dans les 
manipulations futures. 

• Le code de I'evenement (champ what) est predefini par les constantes suivantes : 



#define NullEvent 





f evenement nul 7 


#define MouseDowrt 


1 


r bouton de la souris enfonce 7 


#define MouseUp 


2 


C bouton de la souris reiach© 7 


#define KeyDown 


3 


r louche du clavier enfoncee 7 


#de(ine AutoKey 


5 


f repetition de louche */ 


#define UpdateEvt 


6 


r mise a jour de fenetre 7 


tfdefine Activate Evt 


8 


r activation ou desactivation de fenetre 


#define SwitchEvt 


9 


f commutation d'application 7 


#define DeskAccEvt 


10 


T accessoire de bureau classique 7 


#define DriverEvt 


11 


C periphdrique 7 


#de1ine applEvt 


12 


f defini par I'application 7 


fdefine app2£vt 


13 


t* defini par I'application 7 


#deline app3Evt 


14 


r defini par I'application 7 


#define appiEvX 


15 


f defini par I'application */ 



• Le champ message contient de ['information additionnelle sur I'evenement : 

- numero du bouton (Oil) dans le mot bas pour les evenements de type souris ; 

- code ASCII du caractere dans 1'octet bas pour les evenements de type clavier (le 
bit le plus significatif de cet octet etant toujours a zero, c'est l'application qui devra le 
forcer a un pour utiliser le jeu de caracteres optionnels, voir 1'exemple en fin de 
chapitre) ; 

- pointeur sur la fenetre pour les evenements de type fenetre ; 

- defini par le controleur pour les evenements de peripheriques ; 

- defini par I'application pour les evenements propres a I'application ; 

- non defini dans les autres cas. 

• Le champ when contient une notion de temps que nous avons appelee date 
relative. II s'agit tres exactement du nombre de ticks (cinquantiemes de secondes 
quand le systeme tourne a 50 hertz) icouies depuis le demarrage du systeme au 
moment ou I'evenement est survenu. Cette notion suffit pour calculer un intervalle de 
temps entre deux evenements, par exemple pour determiner un double-clic. 
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• Le champ where com lent les coordonnees glob ales du point ou se trouvait le 
pointeur quand t'evenement a eu lieu. Nous l'avons declare comme un entier long, 
nous trouverons done I'abscisse dans le mot haut et l'ordonnee dans le mot bas. Pour 
isoler chacune des composantes, nous utiliserons les operateurs de decalage qu'offre le 
langage C (par exemple au travers de la fonction getbits, dont la definition est donnee 
a la fin de ce chapitre). 

• Le champ modifiers est a manipuler au niveau du bit : chaque bit a une 
signification precise suivant sa valeur. 

- bit : si l'ev£nement fenetre est une activation, ce bit est a 1 , et a s'il s'agit 
d'une deactivation ; 

- bit 1 : si la fenetre active change de type (application <-> systems), ce bit 
est a 1, sinon a ; 

- bit 6 : si le bouton n° 1 est enfonce, ce bit est a 0, sinon a 1 ; 

- bit 7 : si le bouton n° est enfonce, ce bit est a 0, sinon a 1 ; 

- bit 8 : si la touche Pomme est enfoncee, ce bit est a 1, sinon a ; 

- bit 9 : si la touche Majuscule est enfoncee, ce bit est a 1, sinon a ; 

- bit 10 : si la touche Blocage- Majuscule est enfoncee, ce bit est a 1 , sinon a ; 

- bit 11 : si la touche Option est enfoncee, ce bit est a 1, sinon a ; 

- bit 12 : si la touche Controle est enfoncee, ce bit est a 1, sinon a ; 

- bit 13 : si la touche normale enfoncee appartient au clavier numetique, ce bit 
est a 1, sinon a 0. 

Notons que le bouton unique de la souris porte le numero 0. 

Nous definirons un masque pour chaque bit, de facon a rendre plus lisibles les 
programmes qui iront les tester : 



Sdefine ActivaFlag 


0x0001 


#define ChangaFlag 


0x0002 


#defitve Bin 1 State 


0x0040 


#define BlnOStata 


0x0080 


#define AppleKey 


0x0100 


#define ShiftKey 


0x0200 


#define CapsLock 


0x0400 


#define OptionKey 


0x0800 


#define ControlK&y 


0x1000 


#deftne KayPad 


0x2000 



Ainsi, pour tester la valeur du bit indiquant si la touche Pomme est enfoncee, on 
testera la valeur 

tache.jnodiffera & ApplaKay 

Si cette valeur est vraie (non nulle), le bit 8 est a 1, done la touche Pomme etait 
enfoncee. De meuie, on pourra tester plusieurs bits a la fois : 

tache.modrffacs & (CapsLock + ShiftKey) 

Si cette expression est vraie, e'est qu'au moins 1'une des deux touches Blocage- 
Majuscule ou Majuscule etait enfoncee quand 1'Event Manager a rapporte l'dvene- 
ment. 



Masques devenements 

On peut demander a certaines routines de 1'Event Manager d'opereT sur un 
ensemble restreint de types d'evenements, au lieu d'opdrer sur la totalite. Pour ce 
faire, on deftnira un masque d'evenements qui servira d'argument a ces routines. 
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Le masque est un entier sur 16 bits, chaque bit etant en correspondance avec le 
code evenement vu plus haut. Si le bit est a 1, I'evenement correspondant est traite, et 
non retenu si le bit est a 0, Si tous les bits sont a 1 , le masque ne reduit pas 1'ensemble 
des types d'evenements. Un tel masque non seiectif sera code - 1 , en jouant sur la 
representation des nombres entiers en memoire. 

Note L'6venement nul ne peut etre masque. 

Pour rendre plus lisible une application qui utilise des masques d'evenements, nous 
pouvons definir les constantes suivantes : 



#define mDownMask 


0x0002 




#define mUpMask 


0x0004 




#dGfine KeyDownMask 


0x0008 




#define AutoKeyMask 


0x0020 




ffdefine UpdateMask 


0x0040 




#define ActivMask 


0x0100 




ffdefine SwitchMask 


0x0200 




#define DeskAccMask 


0x0400 




#define DrivarMask 


0x0800 




ffdefine applMask 


0x1000 




#define appSMask 


0x2000 




#defme appSMask 


0x4000 




Sdefine app4Mask 


0x8000 




Sdefine Every Event 


OxFFFF 


/* equivaut a 



De la sorte, pour se restreindre aux evenements de type souris, le masque s'ecrira : 
mDownMask + mUpMask 

De meme, pour utiliser tous les types d'evenements sauf les evenements de type 
clavier, le masque s'ecrira : 

Even/Event- (KeyDownMask + AutoKayMask) 

Absolument n'importe qui est capable de lire ces expressions, alors que leur 
equivalent hexadecimal serait plutfit deiicat a interpreter. 



General ites sur les routines 

Quand une application utilise a la fois 1'Event Manager et le Window Manager (ce 
qui devrait toujours etre le cas), elle doit initialiser 1'Event Manager avant le Window 
Manager. Les deux gestionnaires se partagent la mSme page zero en memoire, 
puisqu'ils doivent se partager des donndes (les evenements de type fenetre). Si le 
Window Manager n'est pas initialise apres 1'Event Manager, celui-ci assumera 
qu'aucune fenetre n'est utilisee, et ne generera aucun evenement de type fen£tre ! Le 
chapitre XII donnera une vision d'ensemblc dc l'initialisation des outils. 

Une fois l'initialisation effectuee gr&ce a EMStartUp, ['application gerera une 
boucle au coeur de laquelle la fonction CetNextEvent ira retrouver I'evenement suivant 
a prendre en compte (en tenant compte des diverses priorites vues precedemment). 
L'application reagira en fonction du type d'evenement retourne : 

• Bouton de la souris enfonc6 : ['application appeliera la fonction FindWindow du 
Window Manager pour apprendre dans quelle partie de I'ecran le pointeur se trouvait 
lors de I'evenement, et en fonction de cette reponse, utilisera les outils appropries du 
Menu Manager, du Desk Manager, du Window Manager, du Control Manager ou de 
Line Edit pour satisfaire 1'utilisateur. 
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Remarquons que jusqu'a present nous n'avons pas parte de double-clic. Le double- 
clic n'est en effet pas un £venement en tant que tel, mais doit etre delects comme la 
succession de deux evenements particuliers : un bouton relache suivi tres vite d'un 
bouton enfone£. Nous verrons sur un exemple comment detecter un double-clic. 

Si les combinaisons de type Majuscule-clie doivent eTre gerees par I'application 
(par exemple pour operer une selection multiple disjointe comme dans le finder), il 
faudra prendre en compte le contenu du champ modifiers de I'Event record. 

• Evgnement de type clavier : il faut immediatement verifier dans le champ 
modifiers si la louche Pomme 6tait enfoncee, auquel cas 1'utilisateur a invoque" un 
article de menu par I'intennediaire d'un de ses deux Equivalents-clavier. 

Si ce n'est pas une commande de menu, I'application gere le caractere recu : 
insertion dans le texte de la fenetre active s'il y a lieu, ou ignorance pure et simple de 
I'^venement. 

• Eveisement de type fenetre : appel immediat au Window Manager pour 
utilisation des procedures adequates. 

• desk accessory event : ['application n'aura jamais it trailer ce type d'dvfinement, 
car il est intercept^ et pris en compte automatiquement par le Desk Manager. 

• switch event : quand I'application regoit un ev6nement de commutation d' applica- 
tion, elle doit appeler une routine (inconnue a ce jour) pour sauvegarder son propre 
6tat courant et passer la main a I'autre application. 

Note Au lieu d'utiliser la fonction GetNextEvent pour g£rer la boucle d'evene- 
ments, il sera souvent preferable d'utiliser la fonction Task Master qui dvite pas mal de 
lignes de programmation quand ['application s'y pr£te. Nous verrons comment utiliser 
cette fonction dans le chapitre XI, qui lui est consacre, une fois que la plupart des 
concepts qu'elle gere auront ete introduits. 



EXEMPLES D'UTILISATION 
Boucle a" evenements 



int indie - TRUE; f indicate ur de fin d'ap plication V 

Taskftec tache; /' evenemeril couranl */ 

f debut de I'application: initialisations diverges 7 
EMStartUptpgzero, 20, 0. maxX, 0, 200, mylD); /* initialisation de I'Event Manager 7 
r suite des initialisations V 

FluahEv«nt»(£ve/y£reni; 0); t manage dans la file d'evSnements 7 

do f debut de la boucle d'evenements */ 

{ 

SystemTasK( ) ; P necessaire aux accessotres de bureau 7 

if (!GetNextEvent(Eve/yB'8nf, atache)) continue; f aucun evGnement a girer V 
switch (tache. i*haf) /* quel evenement k gerer? 7 

< 

case MouseDown : r bouton de la sour is enfonca 7 

f appel de la fonction FlndWIndow du Window Manager 7 
break; 

case KeyOown ; f louche du clavier enforvcee 7 

case AutoKey : /* repetition louche du clavier 7 

if ( tache. modifiers & ApplaKey) f la louche Pomme etait-elle enfoncee? 7 
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r oui, on appelle la fonction MenuKey du Menu Manager 7 
else 

r I'application traits le caractere ASCII recu */ 

break; 

case UpdateEvt : f mise a jour d'une fen§tre */ 

T appel de fonctions du Window Manager pour en redessiner le contenu */ 
break; 

case AtttivateEvt : r evenement d'activation V 

il (my Event, modifiers & ActiveFlag) ~ teste t'indicateur activation/desactivation */ 
/* il est a 1 ; la fenetre doit dtre acliv4e "I 



f il est a 0: la fenetre doit etre desactivee V 



break; 



case SwitchEvt : f commutation d'application 7 

r mystere et boule de gomme 7 

break; 

} 
] 
while (indie); /* fin de la boucle d'evenement 7 

f fin de I'applicalion: fermetufe des managers et retour au finder 7 



L'application debute par la declaration des variables globales, puis le programme 
principal commence par ['initialisation des divers gesti on n aires. L'Event Manager est 
initialise par la procedure EMStartUp, qui ne reclame pas moins de sept arguments. 

Le premier designe une frontiere de page dans la banque 0, I'Event Manager ayant 
besoin d'une page complete dans la banque pour pouvoir fonctionner, page qu'il 
partage d'ailleurs avec le Window Manager. 

Le deuxieme argument designs le nombre maximal d'evenements que la file 
d'£v£nements peut g£rer : quand on donne la valeur 0, une taille par defaut de 20 est 
utilisee. 

Les arguments trois a six precisent quelle est I'aire d'action de la souris. Seul le 
quatrieme argument est sujet a variation : maxX doit prendre la valeur 320 pour une 
utilisation du mode super hi-res 320 pixels par ligne, et 640 pour une utilisation du 
mode super hi-res 640 pixels par ligne. 

Le septieme est le numero identifiant ['application (tel qu'il est retourne par la 
fonction MMStartUp du Memory Manager). 

On aura dans le chapitre XII une vision d'ensemble de ['initialisation des outils. 

Avant de commencer a scruter les evinements, il est toujours Don de faire du 
menage pour eliminer tout evenement parasite qui aurait pu survenir pendant les 
initialisations. La fonction FIushEvents est ]k pour cela. Ses deux arguments sont des 
masques d'evenements. Le premier indique quels types d'evenements vont etre retires 
de la file (-1 pour tous les evenements), le second definit un point d'arret : on d£truit 
tous les evenements precedemment definis jusqu'il ce qu'on en rencontre un 
correspondent au second masque (0 signifie pas de masque : on s'arre-te quand il n'y a 
plus rien). Dans 1'exemple ci-dessus, on supprime tous les ev6nements qui pourraient 
se trouver dans la file avant le debut reel de l'application. 

Pour supprimer tous les dvenements de type clavier jusqu'au premier clic souris, on 
eCTirait : 



type - F\usriEv»MS{KeyDovmMask * AutoKsyMask, mDownMask); 
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et la fonction renverrait la valeur 1 (MouseDown), signifianc qu'un evenement de 
code 1 (bouton enfonce) a £te rencontre et a stoppe le processus, ou signifiant que 
tous les ^venements ont etc supprimes. 

La file d'e'v^nements etant debarrass£e de ses parasites, on peut demarrer la boucle 
d'ev£nements. La fonction GetNextEvent est appeiee periodiquement. Elle va nous 
retourner 1'evenement suivant, en respectant les priories vues plus haut. Si 
1'evenement se trouvait dans la file, il en est retired La fonction admet deux 
arguments : le premier est un masque pretisant quels types d'£v6nements l'application 
desire recevoir (les autres types resteront dans la file). Le second donne I'adresse 
d'une zone dc stockage de type TaskRec (plutot qu'un Event record, comme nous 
1'avons deja (fit), oil la fonction va ecrire les caract£ristiques de 1'evenement a traiter, 

GetNextEvent commence par appeler la fonction SystemEvent du Desk Manager, 
pour voir si le systeme ne veut pas intercepter el prendre en charge 1'evenement 
suivant. Dans ce cas, ou bien si 1'evenement renvoye est 1'evenement nul, la fonction 
renvoie la valeur booleenne FALSE (l'application n'a rien a faire, sinon a aller 
chercher 1'evenement suivant). Si au contraire la valeur TRUE est retourn6e, 
l'application doit repondre k 1'evenement. 

Remarque Le Desk Manager intercepte les evenements suivants : 

- desk accessory events ; 

- activate events et update events concernant une fenetre d'accessoire de bureau ; 

- eve'nements clavier et bouton relache si la fenetre active appartient a un 
accessoire de bureau. 

Ce qui signifie qu'une application g£rant les accessoires de bureau nouvelle norme 
aura tres peu de travail a assurer (tout au plus l'appel aux menus deroulants et les 
actions penodiques), et que toute application saura gerer les accessoires de bureau 
classiques, sans rien avoir a faire. Voir le chapitre X pour plus de details sur les 
accessoires de bureau. 

Notons dans la boucle d'evfinements la presence de la procedure SystemTask du 
Desk Manager, destinee a gerer les accessoires de bureau nouvelle norme pour 
lesquels une action periodique est a entreprendre, sans que cette action soil liee a un 
evenement. Par exemple, 1'horloge a besoin d'etre remise a 1'heure toutes les 
secondes, meme si sa fenetre n'est pas la fenetre active (fenetre au premier plan). 

Dans certains cas tres precis, on peut vouloir savoir si tel type d'evenement est 
disponible dans la file d'attente. La fonction EventAvail est faite pour cela. Elle utilise 
les rnemes arguments que GetNextEvent, elle retourne la meme valeur que GetNextE- 
vent, la seule difference est qu'elle ne supprime pas Tenement de la file. 

Supposons qu'on veuille savoir si un evenement de mise k jour est en attente. On 
emploiera I'instruction suivante : 

(lag - EventAvalHOpcfateMasA, &tache); 

Si flag prend la valeur TRUE, tache d£signe le premier evenement de mise a jour 
en attente. Si flag est nul, il n'y a pas de tel evenement en suspens. Voir dans le 
chapitre XI une application pratique de cette routine. 

Une application peut forcer un evenement en le placant elle-meme dans la file 
d'evenements, grace a la fonction PostEvent. Deux arguments : le type de 1'evene- 
ment a forcer (valeur comprise entre et 15, suivant les constantes pr£definies vues 
plus haut), et 1'entier long qui remplira le champ message. Les autres champs seront 
determines automatiquement (position de la souris, date relative, touches de 
modification...) La fonction retoumera zero si 1'evenement est accepte (pas d'erreur). 
Une exception toutefois : pour un evenement de type clavier ou souris, rentier long 
doit contenir dans le mot haut la valeur exacte du champ modifiers, qui sera recopiee 
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au bon endroit. On veillera a ne pas faire n'importe quoi avec cette fonction, 
notamment a ne pas introduire dans la file des evdnements de type fenetre, qui n'ont 
rien a y faire, et pour lesquels le Window Manager propose d'autres routines. Dans la 
plupart des cas, cette fonction ne servira qu'aux applications qui gerent leurs propres 
types d'ev£nements. 



Ajuster le d ess in du curseur 

Quand on a besoin de connaitre 1 'endroit oil se trouve le pointeur, soit on recupere 
le contenu du champ where des evenements, y compris 1'evEnement nul, soit on 
appelle la procedure GetMouse. On lui donne en argument I'adresse d'une zone de 
quatre octets, ou elle renverra la position de la souris au moment de 1'appel. 
Difference fondamentale entre les deux mEthodes : le point dans le champ where de 
1'evenement est exprime' en coordonnees globales, tandis que le point renvoy£ par 
GetMouse est exprimE dans le systeme de coordonnees locales du grafport courant 
(c'est generalement, mais pas obligatoirement, celui associe a la fengtre active). 

Une application intfiressante de cette routine (qui e"vite d'avoir a gerer les 
evenements nuls) : ajuster le dessin du pointeur en fonction de la zone d'ecran oil il se 
trouve. Nous verrons un exemple d'utilisation de GetMouse dans le chapitre consacr6 
au Window Manager ainsi que deux exemples de fonctions ajustant le dessin en 
fonction de certaines conditions, a la fin du present chapitre et a la fin du chapitre V, 

Dans les lignes suivantes, les cakuls des points ptl et pt2 (stocked sous forme 
d'entiers longs) donnent un resultat Equivalent. 

long pt1, pt2; r deux points 7 

pit ■ tache. where : f pt1 est deja en coordonnees globales */ 

GetHouse(4pt2); /* pE est recupere en coordonnees locales... */ 

LocalToGlobal(Spt2); T ...et traduit en coordonnees globales */ 



Bouton de la souris 

• Pour savoir si le bouton de la souris est a un moment precis enfonce^ ou non, on 
appelle la fonction Button. Un seul argument, le numero du bouton (0 ou 1). La 
fonction renvoie TRUE si le bouton est enfonce au moment de 1'appel, FALSE sinon. 

On pourrait imaginer ainsi un bout de programme simulant une partie de flipper (a 
condition qu'il y ait autre chose que la souris Apple branchee sur le Front Desk Bus, 
un joystick a deux boutons, par exemple) : 

int nonfini = TRUE; t indicateur de fin "/ 

do 

I 

if (Button(O)) 

GaucheHaut( ); r bouton enfonce, done dessin du flipper gauche en I'air */ 

else 

Gauche Bas( ); f bouton relache. done dossin du f ipper gauche au repos 7 

if(Button(1)) 

DroiteHautj ); r bouton 1 enforce, done dessin du flipper droit en I'air 7 

else 

DroiteBas( ); /* bouton 1 relache, done dessin du flipper droit au repos */ 

r modifie la valeur de nonfini si la partie est terminee 7 
) 
while (nonfini); 
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Notons une utilisation particulierc de Button, pour attendre le prochain clic souris. 
L' instruct! on suivante peut etre la condition de sortie d'une boucle do, ou tout 
simplement une boucle vide. II n'y aura aucune attente si le bouton de la souris est 
de"ja enfonce quand cette instruction s'execute. 

while{!Button(0)); 

• Pour savoir si le bouton de la souris est toujours enfonce' apres un ev^nement de 
type MouseDown, on appelle la fonction StillDown ou la fonction WaitMousellp. Un 
seul argument : le numero du bouton, Ces deux fonctions retournent TRUE si le 
bouton est enfonce au moment de I'appel, et si de plus il n'y a aucun Svenement de 
type souris pour ce bouton en attente dans la file. Cette condition assure bien que le 
bouton n'a pas £te relache (puis enfonce) depuis le dernier 6venement MouseDown, 
La difference entre les deux ? Si la condition n'est pas remplie, avant de repondre 
FALSE, WaitMousellp supprimera de la file I'evenement de type MouseUp qui s'est 
forcement produit, alors que StillDown le conservera. La distinction peut se reveler 
interessante en cas de gestion simultan^e par l'application d'evenements de type 
MouseUp et de double-clics, 

C'est Tune de ces fonctions qu'il faut employer pour gerer un eviJnement qui se 
repete tant que le bouton de la souris est gardS enfonce, par exemple quand 
l'application doit tenir compte du glissement de la souris. 

L'exemple suivant non seulement illustre, outre la fonction StillDown, certaines 
pa rtieu [ante's de QuickDraw, notamment le mode de transfert XOr et le fonctionne- 
ment malheureusement limite de Pt2Rect, mais encore use largement des conversions 
entre coordonn£es locales et globales, et enfin anticipe certaines fonctions du Window 
Manager que nous etudierons au chapitre V. 

r un die souris a ete enregistr§ dans la region contenu do la fenetre active, 
dans laquelle on veut dessiner des rectangles, par exemple, 

Tant que I'utilisateur promene la souris a I'interieur de la fenetre, on souhaile 
voir la silhouette du rectangle se dessiner et se d<5former, comme dans GSPaint 7 

Pointer wind; f pointeur sur fenetre 7 

Handla cont; I* handle sur sa region contenu 7 

Reel r; f un rectangle 7 

long pt1 , pt2; r les deux sommets opposes du rectangle 7 

long pt3; r le precedent point courant 7 

SetPort(wind); r on va dessiner dans la fenetre wind 7 

cont = GetComRgnfwind); I* on recupere un handle sur sa region contenu 7 

pt1 = tache.wftera ; f lieu ou (a souris a ete enfoncee... 7 

GlobafToLocal{&pt1); /* ...traduit en coordonnees locales 7 

SetRect(8r.0,O,0,O); r initialisation d'un rectangle vide, au oas oil 7 

pt3 - ptt ; T initialisation du point precedent 'I 

SetPanMode(2); r mode XOr pour le crayon 7 

SetSol idPenPat(1 ) ; r pour faire des rectangles gris et blano 7 

do { I* on (ait,,, 7 

GetMouse(Spt2) ; f recherche du point courant 7 

if (!EqualPt(&pt2,&pt3)) I* le point courant a-l-il change? 7 
{ 

LocafToGlobal (& pt2) ; /* le poi n l courant a n coordonnees globales 7 

if (PtlnRgn(Spt2, cont)) f est-il encore dans la region contenu de la fenetre'' 7 
{ 

GJobalToLocal(&p£); f on reteblit les coordonnees locates 7 

Pt2Rect{&pt1 , Spt3, &r); /* le rectangle precedent 7 

FrameRect(fir); f on efface son contour, grace au mode XOr 7 

Pt2Rect(&pt1 , Spt2, &r); f le rectangle actuel 7 

FrameRect(&r); /* on dessine son contour 7 

pt3 = pt2; r le point courant devient I'ancien point 7 
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) 
) 
} 
while (SB1I Down (0)); r ...tantque le bouton ast garde enlonce 7 

PalMReot(&r); r et on dessine definitive me nt le rectangle V 



Gestion du temps, le double-clic 

• Pour connaitre la duree de certaines actions on 1'ordre (Jans lequel les evenements 
se produisent, I'Event Manager gere une notion de temps qui n'a rien a voir avec 
I'horloge int^gree a la machine et qui est alimentee par batterie. Tous les cinquan- 
tiemes de secondes, une action se produit dans le syst£me de la machine : Teeran est 
re dessine, c'est-a-dire qu'un faisceau d 'electrons p'arcourt tout 1'ecran, de gauche a 
droite et de haut en bas, traduisant en pixels colores les groupes de bits constituant la 
m£moire ecran, Quand le faisceau arrive en bas a droite, une interruption se produit 
(dite vertical blanking ou vertical retrace interrupt), pour lui permettre de se 
repositionner en haut a gauche de 1'ecran. Durant cette interruption, toute action 
reclamant une periodirite reguliere tres courte peut avoir lieu. Par exemple la mise a 
jour de la position de la souris, ou ['incrementation d'un compteur. La fonction 
TickCount retoume prerisement le contenu de ce compteur, qui represente par 
construction le nombre de cinq u an tiemes de secondes (encore appel£s ticks) eeoules 
depuis le redemarrage du syst£me (moment oil le compteur a ete initialise a zero). 

Attention Le resultat est un entier long. Du fait qu'il existe la possibilite de 
desactiver momentanement 1'interruption VBL, et que cette deactivation peut se 
proionger sur plusieurs ticks, ce resultat ne correspond pas forcement a la realite, 
puisqu'une incrementation du compteur peut etre sautie de temps en temps. Pour 
connaitre 1'heure, il faut proceder autrement (en appelant ReadAsciiTime, procedure 
appartenant i 1'ensemble nomme Miscellaneous Tools, voir chapitre X). 

Exemple d'application : les resultats d'un benchmark. 

long deb, fin; 
int temps; 
char msg[25]; 

deb - TlekCount( ); r date relative du debut du test 7 

f le benchmark, par exemple le cribto d'Erathostene 7 

fin > T)ckCount( ); f* date relative du fin du test 7 

temps = {int) (in-deb; /* temps ecoute, 

exact si 1'interruption VBL n'a pas ete desactivee 7 

sprintffmsg, "Resultat: %d licks", temps); t sprintf est une fonction 

de la bibliotheque C standard 7 

MoveTo{ 10,30); DrawCStrlng(msg); f ecriftjre du resultat a I 'ecran 7 



Autre exemple Creation artificielle d'un delai durant lequel 1'application ne fait 
rien. 

Rappel Un tick est un soixantieme de seconde sur un syteme tournant a 60 hertz, 
mais un cinquantieme de secondes sur un systeme tournant a 50 hertz. 

Del ai( ticks) 

long ticks; 

1 

long fin ; 

fin = TkkCount( ) + ticks; f date actuelle plus le nombre de ticks a attendre 7 
while (TickCount) ) <- fin); r on ne fait rien tant que !a date de fin nest pas atteinte 7 
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• Quand une application veut faire clignoter quelque chose (par exemple une barre 
verticale pour localiser un point d'insertion dans du texte) et qu'elle est obligee de 
g£rer ce curseur (Line Edit le gererait pour elle), elle peut faire appel a la fonction 
GetCaretTime, qui retournera dans un entier long le nombre de ticks correspondant & 
la periode du clignotement, telle qu'elle a €\& ajuste'e par l'utitisateur grlce a 
I'accessoire de bureau Tableau de Bord. 

• Ouand une application veut gerer les double-clics, un des moyens de faire (ce 
n'est pas le seul, loin de la !) est de contrfiler si un e'v^nement de type MouseDown a 
suivi trts vite un evenement de type MouseUp. La notion de « tres vite » est 
de'terminee par la fonction GetDblTime. qui retourne dans un entier long le nombre de 
ticks qui doit etre considere comme le delai maximal entre les deux evdnements pour 
qu'ils forment un double-clic. Cette valewr est modifiable par I'utilisateur par 
l'intermediaire de I'accessoire Tableau de Bord, 

TaskRec tache; r eVSnement courant V 

TaskRec tachePrec; /* Svenemertt precedent V 

int indie; I* indicateur de fin de boucle 7 

FlushEvent(Fve/yFvenr, 0); /* plus aucun evenemant en attanta */ 

tachePrec. what ^0; f initialisation partialis mais suffisante... V 

tachePrec. when* 0; /* ...de la variable tachePrec V 

do 

{ 

if (!Get Next Event [EveryEvent, & tache)) continue; /* aucun evenement a gerer */ 

switch (myEvent.wfraQ /"quel Evenement k gerer? 7 

1 

case MouseDown : f bouton de la sour is enfonce V 

if (tachePrec. what-- MouseUp &S (tache.tvrien- tachePrec. ivrien)<G»tDblTime( )) 
r reponse k un double-die */ 

else 

T reponse a. un simple-clic 7 

break; 

r suite des instructions case 7 

J 
tachePrec = tacha; P mise en memoire du dernier evenement */ 

} 
while (indie); 



Pour gerer le double-clic, il faut comparer deux £ve*nements : celui que ['applica- 
tion doit trailer, et celui qu'elle vient juste de trailer. On utilise done une variable de 
type e'v6nement pour stocker l'£venement precedent, en particulier son type et sa date 
relative. Comme toujours en pareil cas, il est preferable d'initialiser cette variable 
pour que la premiere comparison puisse avoir lieu et donner un r£sultat faux (pas de 
double-clic), mais la probability d'erreur est tellement infime que ce n'est pas 
indispensable. On obtiendra un double-clic quand I'eVenement precedent sera de type 
MouseUp, I'eVenement en cours de type MouseDown et I'intervalle de temps entre les 
deux inferieur a la valeur rctournic par GetDblTime. 

Les puristes pourront ajouter une condition supplemental re portant'sur le lieu des 
evenements : la souris ne doit pas avoir trap bouge entre le MouseUp et ie 
MouseDown {voire entre le MouseDown actuel et le MouseDown precedent) pour 
qu'i) y ait effectivement double-clic. Le « pas trop bouge » peut £tre vu comme une 
borne superieure a la somme des valeurs absolues des differences de coordonne"es 
entre le point de I'evenement actuel (x 2 ,y 2 ) et le point de I'evenement precedent 
(*i.yi) : 

|x 2 - X]| + | y 3 — y j | < 5 par exemple. 

Nous n'avons pas tenu compte d'une telle condition dans 1'exemple qui suit, voyez 
a I'usage a quelles aberrations cela peut conduire. 
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Exemple complet 



L'exemple suivant propose une visualisation a I'ecran de divers types d'dvene- 
merits. Est affichi en permanence l'etat des touches de modification et des boutons 
(traduction du champ modifiers), la position de la souris en coordonnees globales 
(traduction du champ where) et le temps qui s'ecoule en secondes (traduction du 
champ when). L'application d£tecte les evenements de type MouseDown, Key Down 
et AutoKey, de meme que les double-clics. Pour les evenements de type clavier, le 
caractere invoque est affiche, ainsi que son code ASCII (en hexadecimal). Si la louche 
Option etait enfoncee, le caractere optionnel (obtenu en forcant a 1 le bit le plus 
significatif du code ASCII du caractere) est ggalement affiche. 

On profitera de cet exemple pour const ater que les touches Retour et Entree 
renvoient le meme code ASCII (13 decimal), Elles sont done d'un usage parfaitement 
equivalent, notamment dans l'utilisation des boutons par defaut (voir le Control 
Manager, chapitre VII, et le Dialog Manager, chapitre IX). 

Pour quitter, on appuiera sur la touche Escape (aucune des touches Pomme, 
Controle, Majuscule ou Option ne doit etre enfoncee a ce moment-la). 

Nous avons egalement pris en compte les evenements de type DeskAccEvt, juste 
pour montrer que l'application les recoil, alors qu'elle n'a pas a en tenir compte. 
Essayez pour voir la combinaison de touches Pomme - Contrdle - Escape ! 

Nous profiterons de cet exemple pour jouer avec deux pointeurs : un pointeur en 
forme de point d'interrogation quand la touche Blocage-Majuscule est enfoncee, et la 
fleche traditionnelle dans le cas contraire. Cet exemple a' est pas gratuit. II est au 
contraire tres elegant pour une application devant gerer des aides permanentes. Si 
l'utilisateur bloque les majuscules, il se place en mode Assistance : il va ctiquer 
quelque part grace au point d'interrogation, et l'application affichera un message 
fonction de la position du pointeur au moment du clic. 

On notera deux versions de la fonction AjusteCurs, en fin de listing. La version 
non retenue £tait certes extremement simple, mais provoquait un scintillement 
insupportable du curseur. Au contraire, le fait de memoriser l'£tat precedent dans une 
variable statique et de ne provoquer le changement de curseur qu'en cas de necessity 
donne un r£sultat impeccable. 

On notera egalement la presence de la fonction getbits, qui est d'interet g£n£ral en 
C. Elle permet d'extraire de 1 a 16 bits d'un entier long, et en fait un entier court. 
C'est souvent plus pratique a utiliser que les bitfields (structures C particulieres au 
niveau du bit), et cela nous a permis de programmer une boucle plutfit que huit 
instructions quasiment identiques, pour tester le champ modifiers de l'evenement. 

Pour compiler ce programme, il est necessaire que tous les termes en italique soient 
d£finis dans un ou plusieurs fichiers headers (ce sont des notions que nous avons 
pre"alablement de"finies), a inclure. De meme, les termes en gras representent les 
fonctions de la ToolBox et doivent igalement figurer dans un fichier header. Ces 
fichiers sont g£n£ralement fournis avec votre environnement de travail, lis existent 
fividemment sur la disquette d'accompagnement de cet ouvrage. 

La fonction debut appl (initialisation des outils) et la fonction quitter (fin de 
l'application) sont communes a tous les exemples de 1'ouvrage. Elles seront listees en 
exemple dans le chapitre XII, quand tous les concepts auxquels elles font appel seront 
introduits. 
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modifiers 
BtnlState: oui 
BtnOState: oui 
AppleKeu: non 
ShiftKey: non 
CapsLock: oui 
OptionKey: oui 
ControlKey: non 
Keypad: non 


oil 

x y 




? 


guand 
M583 


Type 

Key Down 


Caractere 

ascii code 
37 7 


option 

1 


<Esc> 
pour quitter 



Figure IV. J. L'&ran de rexemple 



#inc!ude <tools.h> 
#indude <entete.h> 



f oontient la definition des termas en gras 7 
r oontient la definition des termes en italique V 



Cursor intCurs - { r curse ur en forme de point dMnterrogation 7 

9,3, /* 9 lignes, 6 octets par ligne 7 

{ /* image du pointeur 7 

{0x00,0xFF,OxFO,Ox0O,0x00,0x00}, 
{Ox F , OxOO ,0x0 F.OxOO ,0x00 , Ox 00} , 
{OxOF.OxOO ,0x0 F ,0x00 ,0x00 . 0x00}, 
(0x00, Ox 00 ,0x0 F, 0x00 , 0x00 ,0 x00) , 
(OxOCOxOO.OxFG.OxOO.QxOO.OxOO), 
(0x0a,0x0F,OxO0,Ox0O,0xO0,0x00), 
(0x00,0x00,0x00,0x00,0x00,0x00), 
(0x00 , 0x0 F, 0x0 ,0xO0 , 0x00, 0x00} , 
{0x00,0x00,0x00,0x00,0x00,0x00}, 
}. 

{ I* masque du pointeur 7 

(0x0O,0xFF,Ox F0,0x00,0x0O,OxOO), 
(0x0 F,0 X00 , OxOF.OxOO ,0x 00 ,0x00} , 
{QxOF.QxOO.OxOF.OxOOOxOO.OxOO}. 
(Ox 00 , 0x00, Ox F ,0x00 , 0x00, 0x00} , 
{0x00 ,0x00 , Ox F0, 0x00 ,0x00,0x00} , 
{Ox 00 ,0x0 F, 0x00, 0x0 ,0x00 .0x0 0}, 
{0x00,0x00,0x00,0x00, 0x00,0x00}, 
(0xOO,0x0F,0x00,0x00,0x00,0x0O}, 
(0x00,0x00,0x00,0x00.0x00,0x00), 
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P point chaud */ 



7.3 

}: 




TaskRec 
Pointer 


tache; 
arrow; 




I PROGF 


main(] 




1 

TaskRec 
inl 
int 
char 


tachePrec; 
indie - TRUE 
mylD; 
msg[1 5] ; 



r ce que manipule Got N ox (Event V 
r I'adresse du curse ur systeme 7 



PROGRAMME PRINCIPAL 



r I'ev^nement precedent 7 

r indicateur de lin de boucle */ 

r identifiant de ('application "/ 

r ce qui sera atliche V 
in! i; /* un compteur 7 

char car; f le caraelare aliichc */ 

mylD ■= debut_appl(0) ; f initialisations en mode 320 */ 

Des ktop( 5, 0x400000 FF) ; f le bureau prend un fond blanc (routine du Window Manager) ' 
Fl ush Even ts(£very Evetyt, 0); r la file d'evenements est videe */ 

arrow - GetCursorAdr( }; !" adresse du curseur (initialise dans debut appl) "/ 

/* dessin des elements fixes a I'ecran 7 

MoveTo(130,13); LI neTo{ 130.200); 
MoveTb(35,2S) ; DrawCStrl ngltnodifiers"): 
MoveToj 5,40) : DrawCStrl ng (" Bin 1 State :") ; 
MoveTo(5,55); DrawCStringfBtnOState:"); 
MoveTo(5 ,70) ; DrawCStrl ng ( "AppleKey :") ; 
Mov«To(5,e5); DrawCStrlngfShiflKay:"); 
MaveTo(5,100): DrawCStrlng("CapsLock:") ; 
MoveTo{5,1 15): DrawCStringCOptienKey:'!; 
MoveTo(5.130), DrawCStringCControlKey:"); 
MovBTo(5,14S);DrawCString("KeyPad;"); 
MovaTo(1 30,55); LineTo(320,55); 
MoveTo(200,25); DrawCStrl ng("ou"); 
H0V»To{185,35); DrawCString("x"); 
MoveTo(220,3E); DrawCStrlng("y"); 
MoveTo(1 30,95) ; Lln»To<320.95) ; 
MoveToj 190 ,70); DrawCStringCquand"): 
Mov«To(130,14Q); UneTo(320,140); 
MoveTo( 193,1 15); DrawCStrl ng ("Type"), 
MovoTo[175.155); DrawCStrl ngfCaracte re"): 
Mov«To(170.170): DrawCString("asdi"); 
HoveTo(2 15,170); DrawCStrl ng ("code") ; 
MoveTo{260,170); DrawCStrl ng( "option"); 
MoveTo(0.160); LlneTo(1 30.160), 
Mov»To(45,175); DrawCString("<Esc>"); 
Mc-veTo(25,190): DrawCString{"pour quitter"); 

I* initialisation de I'evenement precedent */ 
tache Prec.ivhat = 0; 
tachePrec. when = 0; 

do ( 

AjusteCurs( ); /" ajuste le dessin du curseur 7 

GetNextEventlEveryEVem, *tache) /* tous les evenements sont acceptes 7 
for(i-0; k8; ++i) /* traitement des B modifiers 7 

I 

MoveTo(100.40+15*i); 

if (getbite(( long) tache. mod/fiers, i+6,1)) DrawCStrl ng("oui "): 

else DrawCStrlngfnon"); 

} 
sprintf(msg,"%d ".gelbits(tache. where, 31 ,16)); f abscisse du pointeur 7 
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MoveTo{ 178,50); DrawCStrlng(msg); 

spri n tf(msg , "%d " ,ge tbits (tache .where, 15,16)); /* o rdo nnee du poin teur 7 

HoveTo(£18,50); DrawCString(msg); 

s printf(msg,"%ld", tache. whan /50); f date de I'evenement, traduite en secondes 7 

MoveTo(200,85); DrawCStrtng(msg); 

s wi tc h(tache . wha 1} r que I ev£ nement a. traiter? 7 

{ 

case MouseDown : f bouton de la souris enfonce 7 

MoveTo(175,130); 

if (tache Precwfert-- MouseUp && 

( tache. w/>en- tache Prec. when) < GetDblTIme( ) ) 

DrawCString("DoubteClic"): f double clic 7 

else 

DrawCSWngfMouseDown "); t simple clic 7 

break; 

case KayDown : f louche clavier enfoncee '/ 

car = lache. message & OxFF: f code du caractere 7 

HoveToflTSJOTJiDrawCSIrlngC KeyDown "); 
spnntf(msg,"%x ",car): 
MoveTo(180,185); DrawCString(msg); 
sprinrfjmsg," %c ".car); 
MoveTo(21 8,185); DraiwCString(msg): 
if ( tache. modifiers & OpihnKey) f si la touche est enfoncee.. . 7 

car ]= 0x80: f ...on force a. 1 le bit signifi calif du code ASCII... V 

sprint((msg," %c ",car); /* ...et on ecrit Se caractere obtenu 7 

Mov«To(258.185); DrawCStrlng(msg); 

if ((car == 0x1 B) & f $1 1 « code ASCII du caractere Escape */ 

! (tache. modifiers & AppleKey+OptionKey+$biflKey*ControtKey)) 
indie = FALSE ; 
break; 

case AutoKey : f touche clavier maintenue enfoncee 7 

MoveTo(17S.130);DrawCString(" AutoKey "); 
break; 

case DeskAccEvt : t retour o"un accessoire de bureau classique 7 

MoveTo(17S,130):DrawCString(" DeskAcc "); 
break; 

tachePrec - tache; /* assignation de structures de type TaskRec 7 

} 
whilefindic}; f Tin de la boucle d'evenement V 

quitter(mylD); r gere la fin de I 'application 7 

} 

i FONCTION GETBtTS *****/ 

getbits(x,p,n) f prend n bits a partr de la position p dans un entier long 7 

unsigned long x; 

unsigned int p,n; f ppeut prendre les vaieurs 31, X,..., 1,0 7 

r n doit etre compris entre 1 et 16 7 

re1um( (x»(p+1-n)) & ~(-0«n) ); f retourne un entier sur 16 bits */ 

1 
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("* FONCTION AJUSTECURS '""/ 

AjusteCurs( ) f ajuste Is dassin du pointeur en (onction de l'6tat de 

la louche Blocage-Majuscule 7 

( 

r ce qu'aurait pu aire cene fonction: 

if{tache. mod/fiare & CapsLoc*) S«tCur«or(&intCur8); 
else SetCursor(arrow). 



static modif; 
int ir>d; 

ind - tache.moolffiers S CapsLock : I" etat de la louche Blocage-Majuscule 7 

if(ind =- modif) return; f le meme qu'avant? On sort! */ 
Kfind) SetCursor(&intCurs), f louche bloquee — > point d'interrogation V 

else SetCursor(arrow); r touche debloquee — > curse ur fleche 7 

rrodil = ind; T nouvel 3 tat memorise */ 



CHAPITRE V 

WINDOW MANAGER 

PRINCIPES GENERAUX 



Si vous ne vous en etiez pas rendu compte, I'ecran de ['Apple IIGS est cense 
reprdsenter le dessus de votre table de travail (desktop). Au niveau du finder, les 
icones represented des documents ranges dans des dossiers, ce qui est confonne a la 
realite des choses. De la meme maniere que vous n'ecrivez ni ne dessinez sur votre 
bureau (vous utilisez plutot une feuille de papier), vous n'ecrirez ni de dessinerez 
directement sur I'ecran, vous utiliserez des fenetres. 

La fenetre est le moyen privilege d'echanger de rinformation avec 1'utilisateur : 
toutes ses actions autres que des commandes (dessin, texte, precisions a apporter sur 
une action, etc.) interviendront dans des fenetres, tous les messages qu'il recevra 
(aide, alerte, demande de precisions, etc.) egalement. 

Ces fenetres seront de type different suivant leur origine : fenetres gerees par le 
systeme (alertes generates, accessoires de bureau), fenfitres gerees par ['application. 

Une fenetre possede un certain nombre de caracteristiques qui assurent leur aspect 
universel dans le monde de 1'interface utilisateur Apple : une barre de tine 
(facultative) qui contient le titre de la fenetre et qui sert a la deplacer (en faisant glisser 
la souris) ; dans cette barre de titre, deux controles optionnels ; une case de fermeture 
situ£e a gauche qui sert a fermer la fenetre (par simple die) et une case zoom situee a 
droite qui permet d'agrandir la fenetre au maximum autorise ou de revenir a la taille 
initiale (par simple clic egalement). Immediatement sous la barre de titre, peut se 
trouver une zone d'information (facultative) qui presente la particularity d'etre fixe 
meme quand 1'utilisateur fait dealer le contenu de la fenetre. Ce defilement s'obtient 
grace a des barres de defilement (une barre horizontal en bas et une barre verticale a 
droite, toutes deux optionnelles), constitutes chacune d'une bande de defilement dans 
laquelle se deplace un curseur de difilemem, et de deux fleches de difilemem. Enfin, 
en bas a droite, la case de contrite de taille (optionnelle elle aussi) pennet de modifier 
la taille de la fenetre dans des limites imposees (en faisant glisser la souris). 

Toutes les caracteristiques itaat optionnelles, la fenetre la moins compliqu£e a 
gerer sera constitute d'un simple rectangle, que 1'utilisateur ne pourra ni deplacer, ni 
agrandir, ni faire defiler. La fenetre la plus complete ressemblera a celle de la 
figure V.l. Entre les deux, toutes les combinaisons seront possibles, en se souvenant 
des contraintes suivantes : 
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Figure V.l. La fenetre document standard. 

- on ne peut pas avoir de case de fermeture ou de case zoom sans barre de litre ; 

- on ne peut pas avoir de case de controle de taille sans avoir an moins une barre 
de defilement ; 

- il est generalement ridicule d'avoir une case zoom et pas de case de controle de 
taille. 

II existe une alternative a ce type de fenetre : la fenetre d'alerte. Elle est 
caracterisee par uri contour fait d'un double trait, qui permet de deplacer la fenetre a 
l'instar de la barre de titre de la fenetre classique. Une telle fenetre ne peut posseder 
aucun autre controle : elle sera done de taille fixe, sans possibility de defilement uu 
contenu. 



| c'i- Fichier Edition Fenfitres 



fteqion 

contenu 

de Ca 

Jenetre 



region 
contour 



Figure V.2. [/autre type de fenetre* 
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Le Window Manager est le gestionnaire des fenetres. Grace a lui, nous allons 
pouvoir creer lesdites fenetres, gerer leurs differentes caracteristiques et prendre en 
compte le delicat probleme du multifenetrage, qui assure aux applications une 
puissance exceptionnelle et a 1'utilisateur une liberty accrue. 

Le multifenetrage obeit a des regies generates, I'application devra les suivre 
scrupuleusement : il ne peut y avoir qu'une fenetre active a la fois, et il suffit k 
I'utilisateur de cliquer dans une fenetre inactive pour la rendre active. Les controles 
dans une fenetre inactive sont desactivgs, de telle sorte qu'il est impossible par 
exemple de fermer une fenetre inactive par sa case de fermeture. On pourra toutefois 
deplacer une fenetre inactive sans la rendre active en faisant glisser la souris si la 
touche Pomme est tenue enfoncee durant I'operation. 

Pour savoir comment s'effectue le defilement dans la region contenu d'une fenetre, 
on se reportera au chapitre XI. 



UTILISATION DU WINDOW MANAGER 

Qu'est-ce qu'une fenetre ? 

Pour une application, une fenetre est avant tout un grafport, tel qu'il a ete defini 
dans QuickDraw, avec toutes ses caractenstiques. Ecrire ou dessiner dans une fenetre 
releve done de I'utilisation de QuickDraw. 

Une fenetre, e'est toutefois un peu plus qu'un grafport, puisqu'un certain nombre 
de controles lui sont associes. Ces controles, le Window Manager les gere et a la 
responsabilite de les dessiner. Pour ce fatre, il manipule lui-m£me un grafport a la 
taille de I'ecran, appete Window Manager port. L'ecran est done lui-meme une 
fenetre, entierement g6ree par le Window Manager. Cette fenetre ne possede aucun 
controle particulier, mais d'un aspect purement visuel, la barre de menus systeme peut 
s'apparenter a une zone d'informations. Voir le chapitre VII sur le Control Manager 
pour obtenir plus de details sur les controles geres par le Window Manager et les 
contr6les g£r£s par I'application. 

On gardera toujours presente a l'esprit la regie suivante : e'est le Window Manager 
qui dessine les contours d'une fenetre, e'est I'application qui en dessine le contenu. 
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Le Window Manager sait gerer plusieurs fenetres k la fois, sous la forme d'une liste 
de fenetres. Quand plusieurs fenetres sont presentes a l'£cran, on considere que 
chacune est situee dans un plan different. La fenetre du premier plan est la fenetre 
active, c'est-a-dire la feneTre dans laquelle I'utilisateur eerit ou dessine. Cette fenetre 
devrait toujours etre mise en lumiere (controles actives). Les fenetres dans les plans 
suivants sont dites inactives (et leurs controles desactives). Elles sont partiellement ou 
totalement (ou pas du tout) cachees par les fenetres situees devant elles. 

On peut avoir des fenetres invisibles : elles font partie de la liste des fenetres, mais 
ne sont pas dessinees par le Window Manager. A ne pas confondre avec les fenetres 
cachees ! La fenetre active est tres exactement la premiere fenetre visible de la liste 
geree par le Window Manager. 



Differentes regions d'une fenetre 

Quelle que soit la complexity de la fenetre, celle-ci possede toujours, qu'eile soit 
active ou inactive, deux regions : son contenu et son contour. 
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Hglir* V.4. La fenetre : 



contenu et un contour 



La region contenu est definie par un rectangle a specifier au moment de la creation 
de la fenetre. Ce rectangle est le PortRect du grafport associe a la fenetre. C'est dans 
cette region que I'utilisateur ecrit ou dessine, ou qu'il recpit des informations de 
I'application. 

La region contour borde la region contenu. Ce peut etre un simple trait (partie 
gauche de la fenetre) ou quelque chose de tres complexe : barre de titre, zone 
^'informations, banes de defilement. Plusieurs regions sont contenues dans la region 
contour : la region ddfinie par la case de fermeture, la region de'hnie par la case de 
zoom, la region permettant le deplacement de la fenetre (barre de titre moins les deux 
regions prec^dentes), la region dfifinie par la zone d'informations, la region definie 
par la case de contrdle de taille, ou encore les regions de'finies par chacune des barres 
de defilement (fleches, bandes, curseur). 

Ouand la fenetre est inactive, toutes ces regions (sauf les cases de fermeture et de 
zoom) sont encore distinguees par le Window Manager, meme si tous les contr6les 
correspondents sont neutres (voir figure V.3). Un clic dans une fenetre inactive doit 
I'activer, rendant son identite a chacune des regions cities ci-dessus par reactivation 
des controles associes (y compris ceux des cases de fermeture et de zoom), sauf peut- 
etre si le clic intervient dans la barre de titre quand la louche Pomme est enfoncee. 
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Comment une fenetre est dessinee 
I'evenement de mise a jour 



Ouand une fenetre est ddplacee, qu'elle change de taille ou de plan, elle a besom 
d'etre redessinee, de meme que certaines des autres fenetres visibles presentees a 
i'ecran. Le dessin d'une fenetre s'effectue generalement en deux Stapes : le dessin de 
la region contour, puis le dessin du contenu. 



La premiere etape est entierement ger6e par le Window Manager, qui redessine 
dans son propre grafport toutes les regions qui doivent 1'etre. II utilise pour cela une 
fonction de definition de fenetre par defaut, a moins qu'une autre definition soit 
fournie par le programmeur pour que son application gere des fenetres particuheres 
(pourquoi pas des fenetres en forme de pomme ?). II utilise aussi une proc6dure 
d^claree par 1'application pour dessiner le contenu de la zone d'informations, quand 
elle existe. 



Pour realiser la deuxieme etape, le Window Manager genere un evenement de 
mise a jour, un Update Evt (voir le chapitre IV consacr^ a l'Event Manager). II realise 
cela en accumulant dans une region particuliere qu'il gere au niveau de chaque 
fenetre, Vupdate region, les parties de la region contenu qui n6cessitent d'etre 
redessinees. Periodiquement, le Window Manager venfie le contenu de Y update 
region. S'il est vide, pas d'£v6nement de mise a jour. Sinon, il fait dire a 1'application, 
par l'intermediaire de GetNextEvent ou TaskMaster, qu'un UpdateEvt est survenu, 
precisant dans le champ message de YEventRecord de quelle fenetre il s'agit (ces 
evenements sont generds dans l'ordre des fenetres, du premier plan au dernier plan). 
C'est 1'application qui se charger a du reste, en proc^dant ainsi : 



- appel de la procedure BeginUpdate, qui remplace temporairement la region 
visible du grafport de la fenetre par son intersection avec la region a mettre a jour, et 
qui remet a vide cette derniere ; 

- dessin du contenu de la fenStre ; 

- appel de la procedure EndUpdate, qui restaure la region visible correcte. 



La figure V.5 montre en trois phases deux 6v6nements de mise k jour. La fenetre X 
est au deuxieme plan (V.5. a), elle va etre deplac6e verticalement sans etre activ6e 
(touche Pomme enfoncee durant l'op6ration). En V.5. b, nous voyons le resultat apres 
ddplacement : les regions contour des fenetres ont ete redessinees par le Window 
Manager, et deux fenetres ont un contenu necessitant une mise a jour. Le Window 
Manager va done g^nerer deux update events, un pour la fenetre au deuxieme plan, 
puis un pour la fenetre au troisieme plan. L' application prend en compte ces 
evenements, et nous obtenons la figure V.5.c. 



Notons un point interessant : c'est au moment de redessiner la region contour que 
le Window Manager appelle la procedure de dessin (g6ree par l'application) de la zone 
d'informations. Celle-ci est done mise a jour avant le contenu de la fenetre. 
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KtRtire V.5.c. Aprfcs les ^tenements d* mist- si jo 



Comment une fenetre est activee : 
I'evenement d' activation 

Plusieurs routines du Window Manager font passer les fenetres de I'etat actif k 
l'£tat inactif, et inversement. Pour de tels changements, le Window Manager gen&re 
un evenement d'activation/d£sactivation. Le champ message de VEventRecord precise 
de quelle fenetre il s'agit, le bit (ActiveFIag) du champ modifiers precise s'il s'agit 
d'une activation ou d'une desactivation, et le bit 1 (ChangeFtag) du m£me champ 
sign ale en cas d 'activation si le type de la fenetre active a change (entre fenetre 
systeme et fenetre de I'application). Remarque importante : dans les versions 1.00 de 
l'Event Manager et 1,03 du Window Manager, ce bit ne fonctionne pas du tout ainsi. 
Est-ce un bogue qui sera repare dans une version future des outils, est-ce la 
fonctionnalitS du bit ChangeFlag qui a change ? A 1'heure oil nous ecrivons ces lignes, 
nous sommes dans l'incapacite de repondre a ces questions, et nos difterents exemples 
eviteront 1'utilisation de ce bit. 

Des que ['Event Manager detecte la presence d'un gvenement de ce type, il le fait 
savoir a I'application par I'interrnediaire de GetNextEvent ou Task Master, et de 
maniere immediate, puisque cet evlnement est prioritaire sur tous les autres. 

Generalement, quand une fenetre devient active, une autre devient inactive. Aussi 
les evenements de type ActivateEvt sont-ils la plupart du temps generes par paires : 
d'abord I'evenement de desactivation, ensuite I'evenement d'activation. Parfois, un 
seul evenement intervient, par exempte quand il n'y a qu'une fenetre dans la liste des 
fenetres existantes, ou quand une fenetre est defirntivemem detruite, 

De maniere plus precise, notons que le Window Manager ne genere aucun 
evenement d'activation ou de desactivation a propos d'une fenetre systeme (accessoire 
de bureau, alerte ou modal dialog). Un evenement d'activation est genere a 
1'apparition d'une fenetre application quand elle passe au premier plan (que ce soit 
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suite a sa creation, ou parce qu'elle a €t€ selectionnee par l'utilisateur). Un e>v£nement 
de deactivation est genere quand une fenetre application quitte le premier plan. 
Aucun ev£nement de deactivation n'intervient si une fenetre devient invisible ou est 
fermee. 

En r^ponse a de teis evenements, I'application doit proc^der de la rnani£re 
suivante : 

- rendre courant le grafport de la nouvelle fenetre active si l'utilisateur ou 
I'application doivent directement dessiner dedans, sans passer par un e"venement de 
mise a jour ; 

- desactiver ies controles de ia fenetre inactive, activer les controles de la fenetre 
active (seuls sont concerned les controles que I'application a cr6es elle-mlme) ; 

- dans une fenetre destinee a manipuler du texte, rendre son aspect normal a la 
zone selectionnee ou cacher le point d'insertion clignotant quand la fenStre devient 
inactive, restaurer la zone selectionnee ou le point d'insertion quand elle redevient 
active ; 

- activer ou desactiver certains menus ou articles de menus en fonction des 
commandes qu'il est possible de lancer a partir de la fenetre active. 

Notons que toutes ces actions sont optionnelles, et on peut tres bien imaginer une 
application ignorant purement et simplement les evgnements d'activation. II ne faut 
pas confondre evdnement d'activation et ev^nement de mise a jour, meme si le 
passage au premier plan d'une fenetre necessite presque toujours de redessiner 
partiellement ou completement son contenu. 



FenStre, 




Figure V.6.H. Situation initiate. 
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Figure V.ft.tu Apr&s Its evtnements d'Httivatlon/desaetivatioii. 
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Figure V,6*c. Apres refinement de mi** a jour. 

La figure V.6 montre 1'enchatnement activation - mise a jour pour une fenetre 
passant au premier plan. La fenetre... est au second plan quand l'utilisateur clique 
dedans, peu importe ou (V.6. a). L' application envoie 1'ordre de rendre cette fenetre 
active, et le Window Manager ['execute (V.6.b). La fenetre... passe au premier plan et 
est contrasted tandis que la fenetre 1 passe au second plan et est rendue inactive, Le 
Window Manager a redessine les contours et appele la procedure de dessin de la zone 
d'informations. II ne lui reste plus qu'a generer 1'evenement de mise a jour sur la 
fenetre de premier plan. L'application le prend en compte, et nous obtenons I'Scran 
de la figure V.6.c. 
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Structure manipulee par le Window Manager 

Pour creer une fenetre, le Window Manager reclame un tr£s grand nombre de 
renseignements. Au lieu de les passer les uns apres les autres par la pile (en arguments 
de fonction), on les rassemblera dans une structure particuliere, appelee ParamList, 
qui de plus pourra etre geree dans un fichier source feserv£ aux donn^es, et ne pas etre 
m£lang£e au code de l'application, afin d'en faciliter la modification. 

Void la definition de cette structure : 



struct _ParamUst { 


irvt 


param_langth ; 


int 


wFiame . 


Points 


r wWe ; 


tong 


wRefCon ; 


Fleet 


wZoom; 


Pointer wCalor; 


int 


wYOrigin ; 


int 


wXOrigin ; 


int 


wDataH, 


int 


wDataW; 


int 


wMaxH; 


int 


wMaxW; 


int 


wScrollVer ; 


int 


wScrollHor ; 


int 


wPagaVer ; 


int 


wPageHor; 


long 


wlntoRefCon ; 


int 


winhHeight ; 


long 


('wFrameDefProd) ( ) ; 


void 


\*wlnloDafProc) ( } : 


void 


{'wConlDe/FrodH) ; 


Fleet 


wPosition ; 


long 


wPlane ; 


long 
t ■ 


wStoraga ; 


) ■ 
#define ParamList struct _ParamList 



Explication du contenu des difterents champs de cet enregistrement : 

• paramJength donne en octets la taille de la liste complete d'arguments. Bien 
qu'elle soit de 78 octets, il est preferable de coder ce champ avec l'instruction C 
sizeof(Param List). 

• wFrame est un masque qui deiinit les caractenstiques de la fenetre. Chacun des 
16 bits de cet entier a une signification precise : 

bit : FJilLITED. G£re de maniere interne, precise si la fenetre est contrasted 
(1) ou pas (0). 

bit 1 : F.ZOOMED. Precise si la fenetre est en £tat zoome (1) ou pas (0). Mettre 
& la creation, sauf si la fenetre est reellement ouverte dans son 6tat zoome\ 

bit 2 : FjkLLOCATED. Precise si le Window record a £fe alloue par la fonction 
New Window (1) ou directement par l'application (0), Dans le second cas, e'est 
l'application qui devra libgrer 1'espace memoire reserve pour ce Window record. 

bit 3 : F-CTRLJTIE. Precise si les contrfiles associes a la definition de la fenetre 
restent actifs meme quand la fenetre est inactive (1), ou sont consideres comme 
inactifs des que la fenetre est desactiv£e (0). 

bit 4 : FJNFO. Precise si la fenStre possede une zone d 'informations (1) ou nas 
(0). 
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bit 5 : F.VIS. Precise si la fenetre est visible (1) ou pas (0). On peut ainsi creer 
des fenetres invisibles, dont ['apparition est momentan£ment differee. 

bit 6 : F.QCONTENT, Ce parametre est subordonne a I'utilisation de Task Ma- 
ter. Si le bit est a 0, un evenement de type MouseDown dans une fenetre inactive aura 
pour effet d'aetiver la fenetre, sans plus. Si le bit est a 1, non seulement la fenetre sera 
activde, mais 1'evenement sera encore utilisable, comme s'il avail eu lieu dans la 
fenetre active. 

bit 7 : FJ40VE, Precise si la fenetre peut etre deplacee (1) ou non (0) en faisant 
glisser la souris a partir de la barre de titre (ou du cadre dans ie cas d'une fenetre type 
alerte). 

bit 8 : F.ZOOM. Precise si la barre de titre de la fenetre con tie nt une case zoom 
(1) ou pas (0). 

bit 9 : F-FLEX. Precise si l'aire des donnees est flexible (1) ou pas (0). Si ce bit 
est a 1, 1'origine ne sera pas modifiee par GrowWindow ou Zoom Window. 

bit 10 : F.GROW. Precise si la fenetre possede une case de controle de taille (1) ou 
pas (0). 

bit 11 : F.BSCRL. Precise si la fenetre possede une barre de defilement horizon- 
tale (1) ou pas (0). 

bit 12 : FJiSCRL. Precise si la fenetre possede une barre de defilement verticale 
(1) ou pas (0). 

bit 13 ; FJiLERT. La region contour de la fenetre est un double trait si ce bit est a 
1, aucun autre controle ne doit alors etre present, Ce contour agira comme la barre de 
titre : la fenetre pourra etre deplacee a partir de ses quatre cdtes {si FJMOVE est a 1 , 
bien sur). 

bit 14 ; F.CLOSE. Precise si la barre de titre de la fenetre contient une case de 
fermeture (1) ou pas (0). 

bit 15 : F.TITLE. Precise si la fenetre possede une barre de titre (1) ou pas (0). 

Dans I'exemple donne" plus loin, wFrame prend la valeur OxDDAO, ce qui signifie, 
puisque : 

DDA0 hexa = 1101 1101 1010 0000 binaire, 

presence d'une barre de titre, d'une case de fermeture, des deux baires de 
defilement, de la case de contrfile de taille et de la case de zoom. Par contre, absence 
de zone d'informations. De plus, la fenetre sera visible au moment de sa creation et 
elle pourra etre deplacee. 

Une autre valeur typique est 0x20A0, designant une fenetre visible, pouvant etre 
deplacge et de type alerte (le contour est un trait double qui sert de zone de 
defacement). 

• wTitle est un pointeur sur le titre de la fenetre (chalne de caracteres de type 
Pascal). Si la fenStre n'a pas de barre de titre, on peut mettre ze>o-long, ou pointer sur 
une chaine vide. 

• wRefCon est une valeur quelconque (sur quatre octets) associee a la fenetre, que 
1'application peut utiliser comme bon lui semble. Nous ferons grand usage de ce 
champ dans plusieurs exemples de cet ouvrage. 
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• wZoom est un rectangle qui determine la region contenu quand la fenetre est 
zoomSe. En mettant a zero la coordonnee du bas du rectangle (bottom), on utilisera 
un rectangle par defaut tel que la fenetre utilise 1'ecran entier (moins la barre de 
menus, evidemment). 

• wColor est un pointeur sur une table qui decrit les couleurs utilisees pour le dessin 
de la region contour. La valeur z£ro-long designera les couleurs par ddfaut. Cette 
table est composed de cinq entiers, soit dix octets. Chaque entier a sa propre 
codification ; 

- premier entier : couleur des lignes du contour, 
bits Oil 3 : inutilises ; 

bits 4 & 7 : numero de couleur dans la palette en cours d'utilisation ; 
bits 8 a 15 : a zero. 

- deuxieme entier : couleur du titre. 

bits a 3 : numero de couleur pour le titre et I'interieur des cases de 
fermeture et de zoom ; 

bits 4i 7: numero de couleur pour le titre quand la fenetre est inactive ; 

bits Sail: numero de couleur pour la barre de titre quand la fenetre est 
inactive ; 

bits 12 a 15 : a zero. 

- troisieme entier : barre de titre, couleur et motif. 

bits a 3 : num6ro de couleur du fond de la barre de titre (fenetre active) ; 

bits 41 7 : numero de couleur du motif de remplissage de la barre de titre 
(fenetre active) ; 

bits 8 a 15 : style du motif de remplissage (0 = solide, 1 = points, 
2 = lignes). 

- quatrieme entier : couleur de la case de contrdle de taille. 

bits a 3 : numero de couleur de 1'inteneur de la case quand elle est 
s^lectionnee ; 

bits 4 a 7 : numero de couleur de I'interieur de la case quand elle n'est pas 
select ionnee ; 

bits 8 a 15 : a zero. 

- cinquieme entier : couleur de la zone d'informations. 
bits 013: inutilises ; 

bits 4 a 7 : numero de couleur pour I'interieur de la zone d'informations ; 
bits 8 a 15 : a zero. 

• wYOrigin designe 1'offset vertical de la region contenu, autrement dit Pordonn6e 
du point de l'aire des donnees coincidant avec le coin supe'rieur gauche du PortRect de 
la fenetre. Forcer zero si I' application n'utilise pas de barre verticale de defilement. 
Cette valeur est aussi utilisee dans le calcul des regions composant cette barre (taille et 
position du curseur de defilement). 

• wXOrigin designe 1'offset horizontal de la region contenu, autrement dit 
1'abscisse du point de l'aire des donnees coincidant avec le coin superieur gauche du 
PortRect de la fenetre. Forcer zero si 1'application n'utilise pas de barre horizontale de 
defilement. Cette valeur est aussi utilised dans le calcul des regions composant cette 
barre (taille et position du curseur de defilement). 

• wDataH designe la hauteur totale de l'aire des donnees. Forcer zero si 
1'application n'utilise pas de barre verticale de defilement. Cette valeur est aussi 
utilised dans le calcul des regions composant cette barre (taille et position du curseur 
de defilement). 

• wDataW designe la largeur totale de l'aire des donnees. Forcer zero si 
1'application n'utilise pas de barre horizontale de defilement. Cette valeur est aussi 
utilisee dans le calcul des regions composant cette barre (taille et position du curseur 
de defilement). 
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Figure V,7. Contenu de La teuton rt aire des doun*«. 

• wMaxH designe la hauteur maximale autorisee de la region contenu quand la 
fenetre est agrandie. Mettre zero pour autoriser l'utilisation de toute la hauteur de 
1'ecran (barre de menus exclue), ou quand la fenetre ne possede pas de case de 
controle de taille. 

• wMaxW designe la largeur maximale autorisee de la region contenu quand la 
fenetre est agrandie. Mettre zero pour autoriser l'utilisation de toute la largeur de 
1'ecran, ou quand la fenetre ne possede pas de case de contrdle de taille. 

• wScrollVer designe le nombre de pixels duquel TaskMaster doit faire defiler le 
contenu de la fenetre quand Tune des fleches est selectionnee dans la barre de 
defilement verticale. Mettre zero si la fenetre ne possede pas de barre verticale, ou si 
1'application n'utilise pas TaskMaster. 

• wScrollHor designe le nombre de pixels duquel TaskMaster doit faire defiler le 
contenu de la fenetre quand Tune des fleches est selectionnee dans la barre de 
defilement horizontale. Mettre zero si la fenetre ne possede pas de barre horizontale, 
ou si 1'application n'utilise pas TaskMaster. 

• wPageVer designe le nombre de pixels duquel TaskMaster doit faire dealer le 
contenu de la fenetre quand la bande de defilement (zones PageUp ou PageDown) est 
selectionnee dans la barre de defilement verticale. Mettre zero si la fenetre ne possede 
pas de barre verticale, ou si 1'application n'utilise pas TaskMaster. La valeur zero 
sigmfie dans les autres cas hauteur de la repon contenu moins dix unites. 

• wPageHor designe le nombre de pixels duquel TaskMaster doit faire defiler le 
contenu de la fenetre quand la bande de defilement (zones PageUp ou PageDown) est 
selectionnee dans la barre de defilement horizontale, Mettre zero si la fenetre ne 
possede pas de barre horizontale, ou si 1'application n'utilise pas TaskMaster. La 
valeur zero signifie dans les autres cas largeur de la region contenu moins dix unites. 

• wlnfoRefCon designe une valeur (quelconque) qui sera passe e a la procedure de 
dessin de la barre d'information. Mettre zero-long si la fenetre n'utilise pas de barre 
d'information. 

• wlnfoHeight designe la hauteur en nombre de pixels de la barre d'information, 
Mettre zero si la fenetre n'utilise pas de barre d'information. 
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• wFrameDefProc est un pointeur sur la procedure de definition de la fen£tre, ou 
z6ro-long pour utiliser la procedure standard definie dans le Window Manager. 

• wlnfoDefProc est un pointeur sur la procedure qui doit etre appeie pour dessiner 
le contenu de la zone d' informations. Mettre zero-long si la fenetre n'utilise pas de 
barre d 'information. 

• wContDefProc est un pointeur sur la procedure qui doit etre appeie pour dessiner 
la region contenu de la fenetre. Cette valeur peut etre zero-long, a condition que la 
fenetre ne possede pas de barre de defilement. Si la fenetre possede des barres de 
defilement, cette procedure doit exister. Si ['application utilise TaskMaster, cette 
procedure doit exister pour laisser TaskMaster girer toute seule les e"v6nements de 
mise a jour concemant cette fenetre, qu'elle possede ou non des barres de defilement. 
Attention La procedure de dessin ne doit posseder aucun argument et ne doit 
retourner aucune valeur, elle ne doit ni changer le grafport courant ni modifier les 
valeurs wYOrigin et wXOrigin vues plus haut. 

• wPosition est un rectangle, donne en coordonnees globales, qui determine la 
taille et la localisation de la fen£tre. Ce sera le Port Reel du grafport de la fenetre et son 
coin superieur gauche sera I'origine du systeme de coordonnees locales. Pour toute 
fenetre dessinee par la procedure standard, ce rectangle definit la region contenu de la 
fenetre . 
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Figure V.8. Position dt la ftnWrt i I'ftran | coordonnees globales). 

• wPlane est un pointeur designant la fenetre derriere laquelle la fenetre a creer 
doit apparaitre. Mettre zero-long pour qu'elle soil creee au dernier plan, moins-un- 
long pour qu'elle apparaisse au premier plan. 

• wStorage donne I'adresse oil sera stocke le Window record associe a la fenetre. 
Mettre zero-long pour laisser le systeme allouer lui-meme I'espace nScessaire a cette 
operation. Cette derniere solution est preferable, mais dans certains cas, il est 
necessaire de pouvoir allouer soi-meme de la place, par exemple pour detinir une 
fenetre qui sera utilisee en alerte pour dire qu'il n'y a plus de place pour allouer 
d'autres fenetres I 

Un grand nombre de ces parametres ne sont necessaires qu'a l'utilisation de la 
fonction TaskMaster qui evite pas mal de lignes de programmation quand ['application 
s'y prete, Bien que cette fonction fasse partie integrante du Window Manager, nous 
lui consacrerons specialement un chapitre, le chapitre XI. 
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EXEMPLES D'UTILISATION 
Creation et suppression d'une fenetre 

#define mode TO pour mode 320, 1 pour mode 640 7 

void Paint( ); f declaration d'une fonction */ 

ParamUst params - { 

sizeol(ParamiJsl), f taills de cette structure 7 

OxDDAO, /* oontr6les associes a la fen6tre 7 

"\22 Nouvelle fenetra ' f pointeur sur le titre de la fenfltre V 

0L, f enter long d'utlllsatton libre */ 

{30. 0. 190. 300+320* mode), f rectangle contenu quand la fenetre est zoomee 7 

OL, /* pointeur sur la table des couleurs de la fenetre 7 

0, 0, r offset vertical et horizontal de la region contenu 7 

300, 800, /* hauteur et largaur de I'aire des donnees 7 

1 70, 300+32tTmode, r* hauteur et largeur maximum pour la region contenu 7 

4, 16, f nombre de pixels a (aire deliler (Heches de defilement) */ 

40, 160, r nombre de pixels a faire deliler (bandes de defilement) 7 

0L, I* valeur passes a la routine de dessin de la zone d'information 7 

0, r hauteur de la zone d'information 7 

0L, r adresse de la procedure de definition de la lenetre 7 

0L, f adresse de la routine qui dessine la zone d'information 7 

Paint. r adresse de la routine qui dessine la region contenu 7 

{40, 20, 100, 260 +3207node }, f rectangle contenu a la creation 7 

-1 L, I" plan de la fenStre 7 

0L r adresse oil les caraeleristiques de la fenetre sont stockees 7 

I: 

Pointer the Window: f pointeur sur la nouvelle fenetre 7 

f dSbut des initialisations 7 
WindStartUp(mylD); f initialisation du Window Manager 7 

R*freah(0L); f redessine l'ecran 7 

/• suite des initialisations 7 

the Window - NewWindow(5params): f nouvelle fenStra 7 

■■"suite de I'application 7 



void Paint( ) f fonction qui dessine le contenu de la fenetre 7 

r instructions pour dessiner le contenu de la fenStre 7 



Le Window Manager est initialise grace a la procedure WindStartUp. Un seul 
parametre, le numero d'application tel qu'il est retourne par la fonction MMStartUp 
du Memory Manager. La page zero utilisee etant celle de 1'Event Manager, pas besoin 
de cette notion ici. L'ecran est ensuite redessine par la procedure Refresh, qui retablit 
un environnement « bureau » a l'ecran (menus, fen£tres...). 
Remarque La region contour pouvant contenir des controles, on aura sans doute a 
initialiser egalement le Control Manager. Consulter le chapitre XII pour une vision 
d'ensemble de ['initialisation des outils. 

Pour creer la nouvelle fenetre, on utilise la fonction NewWindow. On precise en 
argument 1'adresse de la structure ParamUst qui contient toutes les caracteristiques de 
la nouvelle fenetre, et la fonction retourne un pointeur qui servira a identifier la 
fenetre dans les operations futures oil elle devra etre identifier Ce pointeur destgne 
egalement 1'adresse du grafport associe a la fenetre. 
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New Window alloue ]'e space necessaire pour la bonne utilisation de la fenetre, 
ajoute cette fenetre dans la liste des fenetres, retient qu'il s'agit d'une fenetre geree 
par rapplication et nan par le systeme, etc. Par appel a la procedure QuickDraw 
OpenPort, NewWindow fixe les caractenstiques habituelles d'un grafport par defaut 
(crayon, motifs de remplissage, jeu de caracteres, etc.). 

Note NewWindow peut renvoyer des codes d'erreur dans la variable .errno : 

- S0EO1 si la faille de la structure ParamList dont I'adresse est passee en argument 
est incorrecte ; 

- SQE02 si elle est incapable d'allouer le Window record gere par le Window 
Manager. 

Cette fenetre va vivre jusqu'au moment ou I'application n'en aura plus besoin, soit 
parce que I'utilisateur a demands sa fermeture, soit parce qu'elle n'a plus de raison 
d'etre. On utilisera la procedure CloseWindow pour la supprimer de la liste des 
fenetres ; 

... I* operations & effectuer avaril la suppression (sauvegarde, liberation de memoire) 7 
Close Wirtdow(the Window); f la fenetre n'existe plus */ 

Un seul argument, le pointeur d^signant la fenetre a supprimer. Cette procedure 
libere la memoire occupde par tous les controles associes i la fenetre. qu'ils soient 
geies par le Window Manager ou par I'application. Si d'autres structures ger£es par 
I'application eiaient associees a cette fenetre (en liaison par exemple avec le champ 
d'utilisation libre wRefCon), il est de la responsabilite de ['application de les 
desallouer, sous peine d'encombrer inutilement la memoire avec les consequences 
nefastes que cela pourrait entrain er. 

CloseWindow g£n£rera si necessaire les eve'nements d'activation et de mise a jour 
adequats pour les fenetres restant presentes a L'e'cran. 

Note Dans la ParamList de F exemple, nous avons defini une procedure Paint pour 
dessiner le contenu de la fenetre automatiquement. Cette procedure ne presente 
aucun interet si on n'utilise pas TaskMaster, et on passe alors zero-long a la place. 
Voir le chapitre XI pour plus de details sur l'emploi de cette procedure. 

Attention Si voire environnement de developpement n'accepte pas le titre de la 
fenetre dans la forme que nous venons de voir, il faudra le d^finir a I'exterieur de la 
structure ParamList, et passer explicitement son adresse, de la maniere suivante : 

char titre fen[ ] = "\22 Nouvelte tenetre "; 

ParamList params . ( 

s izeof (ParamList) , 

OxDDAO. 

titrefen, f pointeur sur le titre de la fenetre V 

};' 



Modification des para metres d'une fenetre 

Dans cette section, nous aliens voir comment la plupart des composantes d'un 
Window record peuvent etre changees individuellement. Evidemment, ces compo- 
santes font pratiquement toutes partie de la structure ParamList de creation d'une 
fenetre, et nous donnerons la liste des routines de modification dans 1'ordre des 
champs de cette structure. Dans tous les exemples qui suivent, l'argument theWindow 
disigne un pointeur sur fenetre tel qu'il a £te retourne" par la fonction NewWindow. 

Nombre de ces routines vont par deux : I'une pour recupexer la valeur courante, 
I'autre pour fixer une nouvelle valeur. II est done facile de modifier provisoirement 
une valeur, puis de retablir I'ancienne valeur courante. 
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• On peut modifier la liste des contr61es associ^s a une fenetre, en utilisant la 
procedure SetWFrame. Deux arguments, un masque ayant la structure exacte du 
champ wFrame de la structure ParamList, et un pointeur designant la fenetre a 
modifier. Attention, meme si la fenetre est visible, son contour n'est pas redessine a la 
suite de cet appel. Une facon d'operer est de rendre la fenetre invisible, de faire les 
modifications et de rendre la fenetre visible de nouveau, inutile de dire qu'il faut avoir 
de serieuses motivations pour utiliser cette procedure ! En cas de besoin, la fonction 
GetWFrame renvoie le masque actuellement utilise par la fenetre designee en 
argument. L'exemple suivant montre comment supprimer du contour d'une fenetre la 
barre de defilement horizontale, grace a un « et ■ logique (il ne se passe rien si elle 
n'existait pas). 

int wFlag; 

wFlag - GetWFrame(lheWindoW| ; I" le contour actual 7 

Hide Win dow( the Wi ndow) ; /* fenetre rendue i nvisiblo 7 

SetWFramejwFlag&OxFyFF, theWndow): /* plus de barre de defilement horizontale! 7 

SelectWlndow(lheWindow) ; /* si la fenfilre doit revenir au premier plan 7 

ShowWlndo w(the Window) ; f fenetre re nd ue visi Me 7 

Remarque au passage : tel qu'il est ecrit, l'exemple precedent ne semble rien 
modifier a 1'eeran. En effet, pour toutes les modifications qui touchent aux barres de 
defilement, il faut provoquer leur effacement en changeant la taille de la fenetre (par 
SizeWindow) ne serait-ce que d'un pixel. Tant que la fenetre n'est pas redimensionnee 
(et done que le contour n'est pas redessine^, la barre reste visible ! Aucune subtilite de 
ce genre, par contre, pour faire apparaitre ou disparaitre les cases de fermeture ou de 
zoom. Voir l'exemple en fin de chapitre XI pour une utilisation concrete de cette 
procedure. 

On notera qu'il ne faut pas faire n'importe quoi avec cette routine. Par exemple, il 
ne faut pas jouer avec le bit F.V1S, mais utiliser les routines qui modifieront 
l'invisibiliri des fenetres : 

- pour rendre une fenetre invisible, on utiiisera la procedure HJdeWindow. Pour 
rendre une fenetre visible, on utiiisera la procedure Show Window. Un seul argument 
dans les deux cas : le pointeur sur la fenetre consideree. 

Attention Ces procedures modifient 1'ordre des plans de fenetres, et des evenemencs 
de type fenetre sont generes en consequence, 

- pour ne pas modifier 1'ordre des plans, utiliser ShowHide Deux arguments : le 
premier est un booleen qui prend la valeur TRUE pour rendre la fenetre visible et 
FALSE pour la rendre invisible, le second designe la fenetre. Aucun evenement 
d' activation n'est genere, aussi cette procedure doit-elle etre utilisee avec beaueoup de 
precautions : si la fenetre de premier plan est rendue invisible puis visible par cette 
fonction, elle restera au premier plan, mais contr&les non actifs ! Situation ind£- 
sirable. 

Seule la fonction GetWTrame nous permettra de savoir si une fenetre est visible ou 
pas. AprSs s'etre assure qu'elle existe bien, on fera le test suivant : 

int wFlag; 

wFlag - Get WFrame(trie Window); I" les caracttristiques de la fen§tre 7 

if (wflag S 0k0020) ... /* fenetre visible 7 

else >" fenetre invisible 7 



On ne doit pas non plus jouer avec le bit FMILITED. La procedure SelectWindow 
sert a passer une fenetre au pemier plan et a 1'activer, done la contraster. Voici une 
suite d'instructions classique quand on manipule des fenetres et qu'on est amene a les 
rendre alternativement invisibles et visibles : 
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HldeWindow(theWindow); t fenetre rendue invisible, elle n'est plus au premier plan */ 

r suite de I'application V 
SetectWIndo w{theWindow) ; r la fenetre est se lectio nnee ... 7 

Sho wWindo w(tbeWindow) ; /* . . ,et re ndue visi ble au premie r plan 7 

Remarques 

- apres I'appel a HideWindow dans I'exemple precedent, nan seulement la fenetre 
est devenue invisible, mais I'ordre des plans a ete" permute avec celle qui se trouvait 
juste derriere elle. Notre fenetre est invisible au deuxieme plan, celle qui suivait est 
devenue active (visible et au premier plan) ; 

- si nous avions fait un HideWindow d'une fenetre differente de la fenetre active, 
son plan n' aura it pas €t€ modi fie' ; 

- apres I'appel a SeiectWindow dans I'exemple precedent, la fenetre est revenue au 
premier plan, mais elle est toujours invisible. Elle n'est done pas la fenetre active. 
C'est I'un des rares cas oil fenelre de premier plan et fenetre active ne coincident pas : 
la fen£tre active est la premiere fenetre visible dans 1'ordre des plans ; 

- pour mieux comprendre ce qui se passe, vous n'avez qu'a jouer avec I'exemple 
de fin de chapitre, oil on peut rendre visible ou invisible chaque fenetre, ou on peut 
faire passer au premier plan des fenetres invisibles, etc. C'est tres instruct if ! 

• On peut modifier le litre d'une fenetre grace a la procedure SetWTitle. Deux 
arguments : un pointeur sur une chaine de caracteres de type Pascal contenant le 
nouveau titre et un pointeur designant la fenelre a modifier. Le contour est redessine 
automatiquement par la procedure, que la fenetre soil ou non au premier plan. En cas 
de besoin, la fonction GetWTitle renvoie un pointeur sur le titre actuellement utilise. 

char newTitle[ ] * "\32 Nouveau titre de fenetre "; 
Pointer oldTiUe; 

okffitte = GetWTIt le(theWindow) ; /* on recupe re Tadresse du ti tre co ura n 1 7 

SetWTltle(newTitle, theWindow); f on fixe un nouveau litre 7 

Remarque Si le titre est gener£ de maniere dynamique par I'application (voir 
I'exemple complet en fin de chapitre VI), on n'oubliera pas de reserver un espace 
memoire suffisant pour l'accueillir, puisque la fenetre ne le connart que par 
1'intermediaire d'un pointeur. Voir £ga)ement I'exemple complet en fin de chapi- 
tre XI. 

Note Pour des raisons d'esthetique, il est preferable de laisser un blanc au debut et 
a la fin du titre. Un accessoire de bureau est annonce, qui permettra a I'utihsateur de 
changer lui-meme la couleur des fenetres. Quand des barres de titre style Macintosh 
sont utilisees (voir plus loin), ces blancs sont les bienvenus ! 

• On accede au champ wRefCon par la procedure SetWRefCoii (pour fixer sa 
valeur, un entier long) et la fonction GetWRefCon (pour connaitre sa valeur) : 

long oldRefCon, newRefCon; 

oldRefCon - GetWRefCon( the Window); f on rtcupere ce que contient le champ 7 
SetWBefCon(newRe(Con, theWindow) : I* on fixe la valeur du champ 7 



• On accede au rectangle wZoom (taille du contenu de la fenetre quand celle-ci est 
zoomee) grace a la procedure SetFuMRect (pour fixer sa valeur) et la fonction 
GetFuHRect (pour connaitre sa valeur) : 
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Pointer old Reel; 
Reel newRect; 



f pointeur sur rectangle */ 
C un rectangle V 



oldRect ■ GetFu II Rectflhe Window); f on recupere I'adresse du rectangle */ 
SetRect{&newRect, 0, 30. 620, 180): r noiwelles coordonnees pour le rectangle */ 

SetFullRectf&newRect, the Window); f on fixe ta valeur du champ 7 

Remarque La nature du contenu du rectangle wZoam change en fonction de la 
valeur prise par le bit F.ZOOMED du champ tvFrame. Quand ce bit est a 1 {Stat 
zoome), wZoom contient la valeur pr£c6dente du rectangle contenu de la fenStre, afin 
de pouvoir y revenir. Quand ce bit est a 0, wZoom contient reellement le rectangle de 
zoom. On fera done attention a la valeur du bit avant d'employer SetFullRect, sous 
peine (comme au moment de la creation) d'obtenir des r^sultats surprenants ! 

• On peut modifier la table des couleurs utilisee pour le dessin des contours, avec la 
procedure SetFrameColor, qui utilise deux arguments, un pointeur sur la definition 
des couleurs et un pointeur sur la fenetre visee. Cette procedure sert a changer non 
seulement la couleur des contours d'une fenetre, mais figalement le contenu de la table 
de couleurs par defaut. Cette table par defaut est une table systeme noir et blanc g£ree 
par le Window Manager, il suffit pour la modifier de passer ze>o-long en guise de 
pointeur sur fenetre, C'est cette table par defaut qui sera utilised si la valeur zSro-long 
est passec en premier argument. Cette procedure ne redesane pas la fenetre. on 
utilisera done HideWindow et ShowWindow si necessaire. 

Voyez dans Illustration a quel point un blanc en tete et un en fin de titre seraient 
necessaires 1 
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Figure V.», Barn de litre dans le style M«clnlosh. 



int newColors[5]; 

newColors[0] - 0: 
newColors[1] « OxOFOO 
newColors[2] = 0x020 F 
newColnrs[3] - OxFOFO; 
newColors[4] . 0x00 F0 



r les 5 entiers de la table de couleurs 7 

f traits noirs 7 

T titre en noir 7 

r barre de titre comme sur Macintosh '/ 

r case d© controle de laille 7 

r zone d'inlormation 7 



r modification de la couleur des contours d'une fenetre particuliere 7 
HldeWlndow{lheWindow); /* fenetre rendue invisible 7 

SetFrameCo[or(newColors. theWindow); f on fixe la valeur du champ 7 
SelectWlndow(theWindow): f si necessaire 7 

ShowWindow(theWindow); /* fenetre rendue visible 7 

/* modification de la table de couleurs par defaut 7 
S«tFrameCo1or(newColors. 0L): f ne s'applique pas a une fenfitra en particulier 7 



Hi de Wl n d ow( the Window) ; 
SerFram»Color(0L, iheWindow): 
Sal ectWindoW(lhe Window) ; 
ShowWlndow{lhe Window) ; 



T fenetre rendue invisible 7 

T utilisation de la table par defaut */ 

r si necessaire '/ 

f fenetre rendue visible */ 
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En cas de besoin, la procedure GetFrameColor permet de recuperer a I'adresse 
indiquee en premier argument une copie de la table des couleurs actuellement utilisee 
par la fenetre designee en second argument (ou la table par defaut si le second 
argument est zero-long). 

int oldCobrs[SJ; /* tes 5 entiers de la table da couleurs 7 

GetFrameColor(&oldColors, theWindow); f on recupSre les donnees dans oldColors 7 



• On peut modifier les offsets horizontal et vertical de la region contenu, grace a la 
procedure SetCOrigin. Le premier argument represente l'offset horizontal, le second 
I'offset vertical, le troisieme designe la fenetre. La fonction GetCOrigin retourne la 
valeur des offsets horizontal et vertical, dans un entier long (horizontal dans le mot 
haut, vertical dans le mot bas). 

Ces routines n'auront a etre employees que si I'application utilise des barres de 
defilement, et veut forcer un defilement sans intervention de Putilisateur sur ces 
barres. Les barres de defilement elant gerees par TaskMaster, nous vous renvoyons 
done au chapitre XI pour un developpement plus complet a ce sujet. 

• On peut modifier la taille (largeur et hauteur) de 1'aire des donnees, grace a la 
procedure SetDataSize. Le premier parametre represente la largeur, le second la 
hauteur, le troisieme designe la fenetre. La fonction GetDataSize retourne la valeur de 
la largeur et de la hauteur de 1'aire des donnees, dans un entier long (largeur dans le 
mot haut, hauteur dans le mot bas). 

Ces deux routines presentent un interet en cas d'utilisation de barres de 
defilement, done de TaskMaster (voir chapitre XI). 

Quand la procedure SetDataSize est utilisee, le Window Manager modifie 
automatiquement les barres de defilement, pour tenir compte de la nouvelle taille 
relative de la partie visible par rapport a 1'aire des donnees. 

int I a rg, haut; 

long taille; 

larg - 1000; f 1000 decimal - 3E8 hexa */ 

haut = 500; /* 500 decimal = 1 F4 hexa */ 

SetDataSlze(larg, haut, the Window); f on fixe la nouvelle valeur 7 

taille = GetD8taSize(theWindow); /* taille contient 03EB 01 F4 hexa V 



Remarque Le langage C toierera une instruction du style : 

SeIDataSIze(taille, theWindow}; P taille est un entier long 7 

Le mot haut sera consider* comme la largeur, le mot bas comme la hauteur de 
1'aire des donnees, puisque SetDataSize est une routine type Pascal. 

• On peut modifier la taille (largeur et hauteur) d'agrandissement maximal du 
contenu de la fenetre, grace & la procedure SetMaxGrow. Le premier parametre 
represente la largeur, le second la hauteur, le troisieme designe la fenetre. La fonction 
GetMaxGrow retourne les valeurs d'agrandissement maximal, dans un entier long 
(largeur dans le mot haut, hauteur dans le mot bas). 

Ces deux routines presentent generalement un interet en cas d'utilisation de barres 
de defilement, done de TaskMaster (voir chapitre XI). 
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int larg.haul 

long taille; 

larg - 300; /* 300 decimal - 1 2C hexa V 

haul - 150; f 150 decimal - 96 hexa 7 

SetMaxGrow(larg, haul, theWindow); /* on fixe la nouvelte valeur 7 

taille - GetMaxGrow(lheWindow) ; f ta ill e con tien t 1 2C 96 h b xa ' ■■' 

Remarque Le langage C toierera une instruction du style : 
SetMaxGrowf, taille.the Window) ; r tail I e est un e n tie r long 7 

Le mot haut sera consider^ corame la largeur, le mot bas comrne la hauteur de 
i'aire d'agrandissement maximal, puisque GetMaxGrow est une routine type Pascal. 

• On peut modifier la valeur du nombre de pixels duquel on doit faire dealer le 
contenu de la fenetre quand l'une des fleches est s^lectionnee dans une barre de 
defilement, grace a la procedure SetScroll. Le premier parametre repr£sente le 
nombre de pixels horizon taux, le second le nombre de pixels verticaux, le troisieme 
d£signe la fenetre. La fonction GetScroIl retourne ces valeurs dans un entier long 
(nombre horizontal dans le mot haut, nombre vertical dans le mot bas). 

Ces deux routines prtisentent un interet en eas d'utilisation de barres de 
defilement, done de TaskMaster (voir chapitre XI). L'utilisation de ces routines est 
absolument identique aux precedentes, nous ne repeterons done pas les exemples 
d'utilisation et la remarque concernant le raccourci d'utilisation. 

• On peut modifier la valeur du nombre de pixels duquel on doit faire defiler le 
contenu de la fenetre quand la bande de defilement est s£lectionn6e dans une barre de 
defilement, grace a la procedure SetPage. Le premier parametre reprfsente le nombre 
de pixels horizontaux, le second le nombre de pixels verticaux, le troisieme dfisigne la 
fenetre. La fonction GetPage retourne ces valeurs dans un entier long (nombre 
horizontal dans le mot haut, nombre vertical dans le mot bas). 

Ces deux routines pr£sentent un int6r£t en cas d'utilisation de barres de 
defilement, done de TaskMaster (voir chapitre XI), L'utilisation de ces routines est 
absolument identique aux precedentes, nous ne repeterons done pas les exemples 
d'utilisation et la remarque concernant le raccourci d'utilisation. 

• On accede au champ wlnfoRefCon par la procedure SetlnfoHefCoo (pour fixer sa 
valeur, un entier long) et la fonction GetlnfoRefCon (pour connaitre sa valeur) : 

long oldlnfo, rvewlnlo; 

oldlnfa = GetlnfoRefCon (theWindow); f on nicupere ce que coritient le champ 1 

SMlnf oRef Con (newl nto, the Window) ; r on fixe la valeur d u champ */ 

• La procedure de definition de la fenetre peut etre fixee par SetDefProc, a qui on 
passe son adresse et I'adresse de la fenetre. La fonction GetDefProc retourne cette 
adresse. 

• La procedure du dessin de la zone d'informations de la fenetre peut etre fixee par 
SetlnfoDraw, a qui on passe son adresse et I'adresse de la fenetre. La fonction 
GetlnfoDraw retourne cette adresse. 

• La procedure de dessin du contenu de la fenetre peut etre fixee par SetCDraw, a 
qui on passe son adresse et I'adresse de la fenetre. La fonction GetCDraw retourne 
cette adresse, Ainsi, pour changer la procedure de dessin du contenu d'une fenetre en 
cours d' application, on ecrira ; 

void PainU ) ; /* Paint doit evidemment 4lre defini aitteurs 7 

SetCDraw (Pa int. theWindow); 
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Et il y aura interet apres cela a grinerer un evenement de mise a jour pour la totality 
du contenu de la fenetre ! (on utilisera la procedure InvalRect, voir plus loin). 

• A chaque fenetre sont associges trois regions : la region contenu (la oil dessine 
('application), la region structure (c'est-a-dire le contenu plus le contour) et la region a 
mettre a jour (a partir de laquelle sont generis les UpdateEvt). Pour recuperer un 
handle sur ces regions (dSfinies dans le systeme de coordonn6es globales), on utilisera 
les fonctions GetContRgn, GetStruclRgn et GetUpdateRgn. On verra dans plusieurs 
exemples I' interet de recuperer ces handles, du mo ins les deux premiers, quand on 
gere plusieurs curseurs differents. 

Hands cent, struc, upd; 

cont - GetContRgn(theWindow) : 
struc = GetStructRgn(theWindow); 
upd = GetllpdateFtgn(iheWindow); 



• A chaque fenetre est associe un indicateur permettant de savoir si la fenetre a €t€ 
criSee par Fapplication ou gendree par le systeme (e'est le cas notamment des fenelres 
d'accessoires de bureau). Deux fonctions (quelle richesse !) permettent de connaitre 
cet indicateur pour la fenetre dont le pointeur est passe en argument : GetWKind et 
GetSysWFlag. L'une et 1'autre retourneront FALSE (zero) pour une fenetre de 
I'application et TRUE (valeur non nulle) pour une fenetre systeme. 



int flag; 

flag ■ GetWKInd(theWindow); r nul si la fenetre appartient & I'application... */ 

flag = Get SysWFIag(the Window); f -non nul si ells appartient a un accessoire */ 

Ces procedures permettront par exemple de determiner si la fenetre de premier 
plan appartient a I'application ou a un accessoire de bureau, ce qui permettra de 
pallier en partie la defkience du bit ChangeFlag du champ modifiers d'un evenement. 

• Les auteurs d'accessoires de bureau pourront marquer leurs fenetres du sceau 
Systeme en utilisant la procedure SetSysWindow, avec le pointeur sur la fenetre 
comme argument. Interdiction d'utiliser cette routine dans une application normale t 



Interaction avec lutilisateur 

• Reponse a un evenement de type MouseDown (bouton souris enfonce). Revoirla 
boucle de gestion des ev^nements dans le chapitre consacre" a I'Event Manager. 

int loc; r oil le bouton de la souris a ete enforce 7 

Pointer the Window; f dans quelle fenetre "/ 



case MouseDown : 

loc - FlndWlndow(&the Window, tache.whera); 

it (loc<0) System Ctlck(&tache, the Window, loc); /• accessoire de bureau 7 

else switch(loc) r* ou le bouton de la souris a-t-il et6 enforvce? 7 

{ 

case wlnDesk : r dans une partie libre du bureau V 

r generale ment, on ne fait rien dans ce cas 7 
break; 

case wlnUenuBar ; f dans la barre de menus systeme 7 

r appel de Menu Select dans le Menu Manager 7 
break; 
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case wlnContent : P dans la region contenu crime fenetre 7 

r on r6pond comme I'application doit reagir en invoquant 7 
/* le Control Manager ou Line Edit ou QuickDraw ou autre chose 7 

break; 

case wlnDrag : P dans la barre de titre (hors cases de contr6le) 7 

r appel de DragWlndow. vor ci-apres */ 
break; 

case wlnGrow: P dans la case de contrflle de faille 7 

P appel de GrowWIndow, voir ci-apres */ 
break; 

case wlnGoAway : P dans la case de fermeture 7 

T appel de TnWkGoAway, voir ci-apres 7 
break; 

case wlnZoom : P dans la case de loom 7 

r appel de TrackZoom, voir ci-apres 7 
break; 

case wlnlnlo : P dans la zone d'information 7 

r on re pond comme I'application obit reagir 7 
break; 

case wlnFrama ; P dans ce qui reste des contours 7 

f pas grand chose a Jaire, malheureusement 7 
break; 

} 
break; 



Void done la structure de la reponse a apporter a un evenement de type 
MouseDown. On commence par appeler la fonction FindWindow. Cette fonction 
attend trots arguments. Le premier represente I'adresse ou elle va retourner un 
pointeur sur la fenetre dans laquelle I'utilisateur a clique (ou zero-long si l'utilisateur 
n"a pas clique dans une fenetre). Le second contient l'abscisse et le troisieme 
I'ordonnee (en coordonnees globales) du point oil le bouton de la souris a ete enfonce, 
tel qu'il est stocke dans le champ where de Tevenement, Par un tour de passe-passe 
dont nous ne tarderons pas a etre familier et que nous avons deja evoqug plusieurs 
fois, les deux entiers dSfinissant l'abscisse et I'ordonnee du point peuvent etre 
remplaces par rentier long definissant le point lui-meme, 1'ordre des composantes 
ayant ete choisi de telle sorte que le raccourci fonctionne sans anicroche, 

FindWindow retourne un resultat explicite (sur deux octets), un code qui 
represente la zone dans laquelle le bouton a ete enfonce. Pour etre plus lisible, le code 
peut prendre les valeurs predefinies suivantes : 



#define wlnDask 


16 


ifctefine wtnManuBar 


17 


#detine wlnContant 


19 


Sdefine wlnDrag 


20 


iWefine winGmw 


21 


#define wtnGoAway 


22 


#define wlnZoom 


23 


#define wlnlnlo 


?A 


Adeline wlnFtame 


ZT 



Ces valeurs sont celles qui interviennent quand une fenetre appartenant a 
I'application est invoqu^e. Si l'utilisateur a clique dans une partie d'une fenetre 
systeme (appartenant done a un accessoire de bureau), la valeur retoumee par 
FindWindow est negative : valeur identique, mats le bit 15 est force a 1, ce qui revtent 
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a ajouter la valeur hexadecimale 8 000 aux codes prdcidemment d^finis. Les 
applications gdrant les accessoires de bureau devront appeler la procedure System- 
Click du Desk Manager si !a valeur retournee par Find Window est negative. 

Si I'utilisateur a clique" dans une fenetre d'application active, toutes les valeurs sont 
susceptibles d'etre retourn^es. Si la fenetre n'est pas active, FindWindow perd trace 
des cases de fermeture et de zoom (ces cases ne sont d'ailleurs pas dessindes dans la 
barre de titre d'une fenetre inactive), mais distingue encore les autres regions (zone 
d'informations. contour, case de contr6le de taille, barre de titre et contenu). Dans 
tous les cas, sauf si la souris est pressed dans la barre de titre et que la touche Pomme 
est enfoncde, la fendtre doit etre activee. 

Remarque Si la fenetre a £te" crdde avec les bits F^ALERTzl FJvfOVE positionnes, 
tout le cadre est considdre" wlnDrag. La fenetre peut done Stre d6plac£e par n'importe 
quelle partie de son contour, et plus seulement par le haul (une telle fenetre ne 
possede pas de barre de titre). 

C'est la fonction FrontWindow qui nous permet de savoir si la fenetre est active ou 
non, puisque son role est de renvoyer I'adresse de I'actuelle fenetre active (premiere 
fenetre visible dans I'ordre des plans). Si cette adresse coincide avec celie renvoyde 
par FindWindow, I'utilisateur a clique dans la fenetre active et l'application doit 
repondre de maniere appropride a cette sollicitation, Sinon, pas de question a se 
poser : il faut activer la fenetre dans laquelle I'utilisateur a clique, en appelant la 
procedure SelectWindow avec pour argument le pointeur designant la fenetre. 

SelectWindow fait les choses proprement : elle amene la nouvelle fenetre active au 
premier plan, la « met en lumiere », « dteint » la fenetre active preeddente, et gdnere 
les dvdnements d'activation adequate. 

• L'utilisateur a clique dans la rdgjon contenu d'une fenetre. Si eelle-ci n'est pas 
active, on ['active et on ne fait rien de plus. Si par contre elle est active, l'application 
repond comme elle doit rdagir : en appelant les routines du Control Manager si la 
fenetre est susceptible de contenir des controles crees par l'application (voir le 
chapitre VII), les routines de Line Edit si la fenetre contient du texte Editable (voir le 
chapitre VIII), les routines de QuickDraw si un dessin doit intervenir dans cette 
fenetre... 

case winContent : 

if (IheWindow != FrontWindowO) f cette fenStre est-elle active? 7 

SelsctWindow(theWindow);r non, alors on ('active et on ne fait rien de plus */ 

etse 

T suivant le role de l'application 7 
break; 



• L'utilisateur a clique dans la barre de titre (ou dans le cadre d'une fenetre type 
alerte) et la fenetre a etd ddclarde ddplacable. La fonction FindWindow a renvoye" 
wlnDrag, il va done falloir verifier si l'utilisateur veut deplacer la fendtre, en faisant 
glisser la souris. On respectera les regies de l'interface utilisateur : si la touche Pomme 
est enfoncde au moment du clic souris, la fenetre sera deplacee mais non activde (au 
cas ou elle serai t inactive). Si la touche Pomme n'est pas enfoncee, la fenetre sera 
activee (si necessaire) et deplacee, 

Une seule procedure a appeler, DragWindow, qui va faire tout le travail : tant que 
l'utilisateur n'aura pas relache son bouton, dessin du rectangle representant la fenetre 
en train de se deplacer ; des qu'il l'a relache, ddplacement effectif de la fenetre vers sa 
nouvelle localisation et gdndration des update events pour elle et dventuellement pour 
les autres. La seule chose que l'application doit fournir, c'est I'ensemble des 
arguments necessaires a DragWindow : 
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Figure V.IO, Fcnttrc en cours d* d£ptacemenL 



- premier argument : un entier precisant la resolution du deplacement horizontal. 
Par d£faut, la fenetre sera deplac£e de quatre points en quatre points en mode 320 et 
de huit points en huit points en mode 640, comme sur une grille invisible. Donner la 
valeur zero, c'est accepter ces valeurs par defaut. La valeur 1 permet de placer la 
fenetre n'importe ou. Les autres valeurs autorisees sont les puissances de deux 
exclusivement ; 



- deuxieme et troisieme arguments : 1'abscisse et 1'ordonnSe (coordonnees glo- 
bales) du point ou debute Taction, c'est-a-dire le point stocks dans le champ where de 
I'evenement. C'est le deplacement du pointeur par rapport a ce point qui determines 
le deplacement global de la fenetre. Comme nous I'avons deja dit, C permet de passer 
un entier long a la place des deux composantes sur 16 bits ; 



quatrieme argument : un entier dont la signification est donnee ci-apres 



- cinquieme argument : un pointeur sur un rectangle (coordonnees globales) qui 
precise les limites dans lesquelles le point qui suit la souris peut se deplacer. Si la souris 
sort de ce rectangle mais ne s'en eloigne pas plus que de la valeur contenue dans le 
quatrieme argument, le point de prise de la fenetre reste fige a la frontiere du 
rectangle (la silhouette de la fenetre s'immobilise par voie de consequence). Au-dela, 
la silhouette disparait (plus exactement elle revient a son point de depart), et si 
l'utilisateur relSche le bouton de la souris a ce moment-la, la fenetre ne sera pas 
deplane. Par defaut (si on passe zero-long comme pointeur), le Window Manager 
utilisera comme rectangle frontiere 1'ensemble du bureau (barre de menus exclue, 
evidemment) moins quatre pixels de chaque cote, la « distance de grace » (quatrieme 
argument) etant de huit pixels. Ce rectangle frontiere par defaut est choisi de telle 
maniere que toute fenetre visible pr^sente a 1'dcran au moins seize pixels (quand elle 
est tir£e au maximum en dehors de 1'ecran) ; 



sixteme argument : un pointeur qui designe la fenetre a deplacer. 
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Figure V.ll. Rectangle limits et rectangle dc grace. 

Roc; [imitRect: 

int left, top, right, bottom; 

case wlnDrag : 

f calcul eventuel des coordonnees dj rectangle frontiers */ 
SetRectfSlimitRect, left, lop, right, bottom); r on fixe le rectangle frontiere 7 

if (theWindow !. Front Wlndow() && '(tache.moaWsrs* AppleKeyi) 

SelectWin dowfthe Window) ; 
DragWlndow(1 , tache. whare, 8, MmitRect, theWindow): 
break; 

Attention au calcul du rectangle frontiere : il ne faudrait pas que la totalite de la 
barre de titre d'une fenetre classique puisse disparaitre sous la barre de menus, car 
alors, 1'utilisateur ne pourrait plus la deplacer ! Le plus simple, e'est encore d'utiliser 
les valeurs par defaut, comme le fera TaskMaster : 

case wlnDrag : 

if (theWindow I- FrontWIndowfJ 14 t(tache modifiers & AppleKe/)) 

SolectWl ndow(the Window) ; 
Drag Wl rid ow(0. the Event where, 8, OL, theWindow); 
break; 



Remarque Pour dessiner la fenetre au moment oil I'utilisateur lache le bouton de la 
souris. Drag Window appelle la procedure Move Window, qui efface une fenetre d'un 
endroit de l'ecran pour la redessiner ailleurs, sans en modifier la taille. II suffit de 
donner a MoveWindow la nouvelle abscisse et la nouvelle ordonnee (en coordonnees 
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globales, gvidemment) du coin superieur gauche de la region contenu de la fendtre, 
ainsi que le pointeur de la fenetre a deplacer en troisieme argument. On fera attention 
dans 1'operation a ce que la barre de titre ne disparaisse pas completement au-dessous 
de la barre des menus. 

On verra dans 1'un des examples de fin du ehapitre VI comment MoveWindow est 
utilise* pour creer des fenetres decades les unes par rapport aux autres. 

• L'utilisateur a clique dans la case de controle de taille. La fonction FindWindow a 
renvoye wlnGrow, il va done falloir verifier tout d'abord si la fendtre incrimin^e est 
active ou pas, et dans ce dernier cas, si l'utilisateur veut agrandir ou reduire la fenetre, 
en faisant glisser la souris. (Si la fenetre n'est pas active, on la s^lectionne, e'est tout). 

Deux routines a appeler : la fonction GrowWindow, qui va faire la premiere partie 
du travail (tant que l'utilisateur n'aura pas relache son bouton, dessin des rectangles 
representant la fenetre et ses barres de'defilement en train de changer de taille), et la 
procedure SizeWindow, qui termine le travail {affectation d'une nouvelle taille pour le 
rectangle contenu de la fenetre, dessin du nouveau contour, avec ses contrdles 
modifies en consequence, et generation des evenements de mise a jour pour les 
fenfitres qui en ont besoin). 



■: ■ ■ 








Figure V.12, Fttujtre cd cours d'agraiHlissinwiit. 



La fonction GrowWindow reclame cinq arguments. Les deux premiers indiquent la 
taille minimale que le rectangle contenu de la fenetre pourra prendre (largeur puis 
hauteur). Les deux suivants precisent le point oil commence Taction (abscisse puis 
ordonnee), e'est-a-dire le point stocke dans le champ where de Tevgnement. Le 
cinquieme designe la fenetre incriminee. La fonction retourne dans un entier long la 
nouvelle taille de la fenetre (largeur dans le mot haut, hauteur dans le mot bas), ou la 
valeur zero-long si la fenetre n'a pas change de taille. 

La procedure SizeWindow admet trois arguments. Les deux premiers indiquent la 
nouvelle taille de la fenetre (largeur plus hauteur). C'est exactement Tentier long 
retournS par GrowWindow, en utilisant le raccourci dont nous sommes maintenant 
coutumiers. Si les deux entiers sont nuls. Size Window ne fait rien. Le troisieme 
argument specifie la fene'tre a redessiner, 

case wlnGrow, 

if (the Window !- FronrWindowO) SelectWindow(the Window): 

else 

Sfze Wl rtdow(GrowWI nd ow(50 ,50 ,tache where.theWindow) , the Window) ; 

break; 
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• L'utilisateur a cliquS dans la case de controle de fermeture de la fenetre. La 
fonction Find Window a renvoye WinGoAway, il faut verifier si l'utilisateur a relache 
le bouton de la souris a 1'interieur ou a 1'exterieur de cette case avant d'entre prendre 
quelque action que ce soit. C'est la fonction TrackGoAway qui s'en charge. Trois 
arguments : I'abscisse et I'ordonnee du point oil debute Faction, c'est-a-dire le point 
stocks dans le champ where de l'ev£nement ; le pointeur qui dSsigne la fenetre. La 
fonction retourne une valeur bool£enne : FALSE signifie que l'utilisateur a relach£ le 
bouton a 1'exterieur de la case de fermeture, TRUE signifie que la fenetre doit bien 
etre fermee. A l'application de faire le necessaire pour fermer la fenetre. 

case wlnGoAwsy; 

if(TrackGoAway(tache. where. theWindow) /* bouton relache dans la case? 7 

{ f oui... 7 

f proposer k l'utilisateur d'enregistrer ses modifications 7 

f fermer las fichiers associes k la fenetre 7 

f desallouer les diffe rentes structures associees a la fenetre 7 

Clos*W!ndow(the Window); 

J 

break; 

En fonction de l'application, un Hide Window pourra etre appele a la place de 
CloseWindow (pour autoriser une re'ouverture de la fenetre a partir d'un menu 
deroulant, par exemple, sans avoir a rSallouer toutes les structures associees). 

• L'utilisateur a clique' dans la case de zoom. La fonction Find Window a renvoye 
wlnZoom, il faut verifier si l'utilisateur a relache le bouton de ta souris a 1'inteneur ou 
a l'ext£rieur de cette case avant d'entreprendre quelque action que ce soit. C'est la 
fonction TrackZoom qui s'en charge. Trois arguments : I'abscisse et PordonnSe du 
point ou debute Taction, c'est-a-dire le point stoek£ dans le champ where de 
I'evenement ; le pointeur qui designe la fenetre. La fonction retourne une valeur 
booleenne : FALSE signifie que l'utilisateur a relache le bouton a 1'exterieur de la 
case de fermeture, TRUE signifie que la fenetre doit bien etre zoomee. A 
l'application de faire le necessaire, en appelant la procedure Zoom Window. 

case wlnZocm : 

if(TrackZoom(tache. where, theWindow) t bouton relache dans la case? "I 

Zoom Window[the Window); /• oui, on zoome 7 

break; 

Zoom Window ne reclame qu'un argument : le pointeur sur la fenetre a zoomer. 
Cette procedure ne fait qu'appeler Size Window, en lui passant les bons arguments : si 
la fenetre est deja a sa taille maximale de zoom, elle reviendra a sa taille pr^c^dente, 
sinon elle y passera. Par taille maximale de zoom, comprenons le rectangle wZoom 
passe en argument au moment de la creation de la fenetre (ou modify par la 
procedure SetFullRect), et non wMaxH et wMaxW qui ne sont utilises qu'avec le 
deplacement de la case de contrfile de taille. 

• L'utilisateur a clique dans la zone d'informations d'une fenetre. Si celle-ci n'est 
pas active, on T active et on ne fait rien de plus. Si par contre elle est active, 
['application repond comme elle doit r£agir : en appelant les routines du Control 
Manager si la zone d'informations est susceptible de contenir des controles cre£s par 
['application (nous ne verrons pas cette possibilite dans cet ouvrage),les routines du 
Menu Manager si elle contient des menus deroulants (possibilite que tious ne verrons 
pas non plus), les routines de QuickDraw si un dessin doit intervenir dans cette zone... 
ou en ne faisant rien : apres tout, une zone d'informations peut aussi servir a ne 
donner que des informations ! 

case wlnlnto : 

if (theWindow 1= FrontWindow()) r cette fenetre est-elle active? V 

SelectWIndow(theWindow); f non, alors on I'active et on ne fait rien de plus 7 
else 

T suivant le role de l'application 7 
break; 
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• L'utiiisateur a clique^ dans la region contour d'une fenetre, hors de la barre de 
titre ou de la zone d 'information (ou encore dans la barre de titre d'une fenetre qui ne 
peut etre d£plac£e). Si celle-ci n'est pas active, on I'active et on ne fait rien de plus. Si 
la fenetre est active, le clic peut avoir eu lieu dans une barre de defilement. On 
pourrait alors penser pouvoir gerer soi-meme ce controle, et faire defiler le contenu de 
la fenetre, en faisant appel aux routines ilu Control Manager (c'est comme cela que ca 
se passe sur Macintosh). Malheureusement, les barres de defilement sont des 
controles ai&s et geres par le Window Manager, et sauf k faire des acrobaties peu 
avouables sur certains pointeurs (du style permuter l'adresse du premier contr6le ger£ 
par I'application et celle du premier controle gerf par le Window Manager en allant 
toucher directement k la structure dgfinissant la fenetre, ce qui est en principe 
interdit), la fonction FindControl ne saura les reperer. 

Conclusion De deux choses Tune ; soil I'application veut gerer elle-meme son 
defilement, et elle cree elle-meme les barres de defilement et la case de contr61e de 
taille dans la region contenu de la fenetre (comme sur Macintosh), soil elle utilise 
TaskMaster, qui fera tout cela parfaitement en utilisant les contr6les cr££s par le 
Window Manager dans la region contour de la fenetre. 

Nous prenons personnellemenl le parti d'utiliser TaskMaster, ce qui est plus dans 
I'esprit de I'Apple IIGS. C'est pourquoi dans I'exemple qui est donne k la fin de ce 
chapitre et qui utilise GetNextEvent, nous creerons des fenetres avec barres de 
defilement... incapables de defiler. Pour voir une barre defiler, rendez-vous dans le 
chapitre VII consacre au Control Manager, et bien sur au chapitre XI consacre a 
TaskMaster. 



Evenements de type fenetre 



• Reponse a un evenement de mise k jour. Puisque la fenetre a mettre k jour n'est 
pas forcement la fenetre active (si par exemple une partie d'une fenetre d'arriere-plan 
a et£ decouverte a la suite d'un emplacement d'une fenetre d'avant-plan), certaines 
precautions doivent etre prises pour y dessiner, notamment faire du grafport qui lui est 
associe le grafport courant, apres avoir garde trace du grafport en cours pour pourvoir 
le ritablir a la fin de ['operation de mise k jour. 

Pointer savePort; F pointeur sur le precedent grafport */ 

Pointer port; F pointeur sur la fenetre A mettre a jour */ 

case UpdateEvt; 

savePort - G«tPort( ) ; F sauvegarde du grafport oouranl 7 

port - tache. message ; F pointeur sur la fenetre A trailer 7 

SetPort(port): F on va pouvoir dessiner dans la bonne fenetre 7 

BeglnUpdate(port); F restriction de la region visible a I 'update region 'I 

F ce que I'application a a dessiner V 

EndUpdate(port); F retablissement de la region visible originaJe */ 

SetPort(savePort); F retablissement du grafport original */ 
break; 

Comme il a ete dit, le dessin du contenu de la fenetre a mettre a jour s'effectue 
entre I'appel de deux procedures, BeginUpdate et EndUpdate. Seul argument pour 
chacune, un pointeur sur la fenetre a traiter. La premiere restreint la region visible a 
Y update region et vide cette demiere, la seconde retablit la region visible originale. Ce 
qu'il y a entre ces deux appels est de la responsabilite de I'application : ce sera 
geniralement I'appel a la procedure de dessin (si elle existe) dSfinie dans le champ 
wContDefProc de la ParamList de creation de la fenetre, ou bien aux routines de 
dessins du Control Manager si ['application manipule ses propres contr6les, ou encore 
aux routines de mise k jour de Line Edit si I'application manipule du texte editable. 

• On peut modifier directement le contenu de Yupdate region du grafport courant 
grace k quatre procedures. InvalRect ajoute a Yupdate region le rectangle dont un 



148 I BOlTE A OUTILS DE L'APPLE IIGS 



pointeur est pass£ en argument. InvalRgn ajoute a Vupdaie region la region dont un 
handle est pass6 en argument. A I'inverse, VaJidRect retire de V update region le 
rectangle dont un pointeur est passe en argument et Valid Rgn retire de V update region 
la region dont un handle est passe en argument. But principal de ces procedures : 
provoquer ou empecher un update event. 

Dans tous les cas, le rectangle ou la region doivent etre exprimes en coordonnees 
locales. lis seront automatiquement limites (clipped) au rectangle contenu de la 
fenetre. 

Au lieu de dessiner directement dans une fenetre, on generera artiftciellement un 
evenement de mise a jour en declarant un rectangle ou une region invalides, etc' est en 
reponse a cet evenement que ce rectangle ou cette region seront redessines. (voir les 
exemples du chapitre VT ou du chapitre VIII pour une illustration de ce pnncipe). 
Reciproquement, pour empecher l'evenement de mise a jour, on declarera tel 
rectangle ou telle region valides, et l'evenement de mise a jour (s'il existe encore) ne 
les touchera pas. 

Pour redessiner la totalite du contenu d'une fenetre {par exemple parce qu'on vient 
de changer sa procedure de dessin automatique), on pourra 6crire : 

Beet r; 

Pointer the Window; 

SetRec t(& r,0, , 1 000, 1 000) ; /"rectangle arbitrairement g rand 7 

InvalRect(Sr); /* ajoute le rectangle a la region a mettre a jour 7 

Le rectangle etant plus grand que 1'ecran de 1'Apple IIGS et possedant pour coin 
superieur gauche le point (0,0), nous sommes sur qu'il couwe la totalite du contenu 
visible de la fenetre dans le systeme de coordonnees locales. Son intersection avec la 
region contenu ne posera done aucun probleme ! 

• Reponse a un evenement d'activation/desactivation. Comme nous 1'avons deja 
dit, la reponse a ce type d'evenement est facultative et depend des besoins de 
^application, qui pourra appeler les routines du Menu Manager, du Control Manager 
ou de Line Edit. II pourrait etre interessant par exemple de desactiver tous les menus 
propres a 1' application quand une fenetre d'accessoires de bureau de vient active, et de 
ne garder que le menu Edition et 1'article Fermer du menu Fichier, I'application devant 
alors gerer cet article pour ses propres fenetres mais aussi pour les fenetres systeme. 

case ActivaioEvt : /* evenement d'activation •/ 

if (myEvent. modifiers & AcliveFiag) f teste I'indicateur activation/desactivation 7 

/*il est a 1: la fenetre doit etre activee 7 

else 

f il est a 0: la (enStre doit Aire desactivee 7 

break; 

Nous verrons plusieurs exemples ou les evenements d'activation sont geres, 
plusieurs autres oil ils ne le sont pas. 



Dessin de la zone d" informations 

L'operation qui consiste a dessiner dans la zone d'informations peut etre tres 
simple ou tres complexe en fonction d'une situation donnee. 

II est tres simple de dessiner une zone qui ne changera pas au cours du temps, par 
exemple un texte assimilable a un sous-titre pour la fenetre. On explique au Window 
Manager comment le dessiner une fois pour toutes (e'est le r61e de la procedure 
wlngoDefProc d^finie au niveau de la ParamList), et ensuite, e'est lui qui se 
debrouille ! 
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Plus compliqu<le est la gestion quand le contenu de la zone doit varier en fonction 
d'£venements exteneurs (dans 1'exemple compiet donne plus loin, un message est 
affiehe en fonction de la position de la souris), Dans ce cas, il faut a la fois (aire le 
travail soi-meme, et renseignei le Window Manager de ce qui a ete fait pour qu'il le 
refasse lui-meme en cas de besoin. 

Plus compliquee egalement la gestion quand le contenu de la zone est en 
interaction avec 1'utilisateur (si par exemple elle contient des menus deroulants ou des 
controles). Nous avons pris le parti de ne pas parler de ce point dans cet ouvrage, mats 
il n'y a plus beaucoup d'efforts a faire quand on a compris I'etape precedente ! 

• La procedure g£ree par le Window Manager 

Des que le Window Manager ressent la necessity de dessiner la zone d'informations 
dune fenetre, il appelle la procedure dont I'adresse a ete passee dans la ParamList a la 
creation de la fenetre. C'est ainsi que le Window Manager assurera la mise a jour de 
cette zone (fenetre rendue visible, portion de la zone d'informations masquee par une 
autre fenetre et reapparaissant de nouveau, fenetre redimensionnee, etc.). NewWin- 
dow appelle cette procedure si la fenetre est cr£ee visible, et ne I'appelle pas sinon. 
Done, quand on ne sait pas ce que contiendra la zone d'informations, avant la 
creation, on ouvrira une fenitre invisible et on Bxera aiors, soit la proc£dure_ de 
dessin, soit la valeur qu'elle doit recevoir de l'application, puis on rendra la fenetre 
visible. 

La procedure de dessin doit etre declared ainsi : 

pascal void in[oRect(bar, data, wnd) 

fleet *bar; 
long data: 
Pointer wnd; 

r instructions de dessin de la zone */ 
> 

Quand le Window Manager appellera cette procedure, I'environnement sera un 
peu special : le grafport courant sera le Window Manager port, avec un systeme de 
coordonnees locales dont I'origine se trouve exactement au coin supeneur gauche de 
la fenetre (systeme de coordonnees permettant de dessiner les contours d'une 
fenetre). Le Window Manager donne la valeur des arguments de la procedure. Le 
premier representee un potnteur sur le rectangle dgfinissant la zone d'informations, 
cadre exclu, dans ce systeme de coordonnees. C'est dans ce rectangle que l'application 
doit dessiner. Le deuxieme argument sera la valeur contenue dans le champ 
wlnfoRefCon, qui a £te fixe soit dans la ParamList, soit au moyen de SetlnfoRefCon. 
Le troisieme argument designera la fenetre a laquelle appartient la zone d'informa- 
tions. 

Grace au troisieme argument, plusieurs fenetres peuvent se partager la meme 
procedure. Grace au deuxieme, fix£ par l'application, n'importe quoi peut etre 
dessine' (une chaine de caracteres, rep^ree par un pointeur, une barre de menus, 
reperee par un handle, une image tout en largeur, etc.). Grace au premier argument, 
l'application sait oil dessiner : dans ce rectangle, et nulle part ailleurs ! Pour eviter des 
surprises, on peut meme fixer une clip region equivalente a ce rectangle, avant de 
commencer le dessin. 

On peut changer les caracteristiques du grapfort avant de commencer a dessiner, 
mais il est imperatif de les retablir avant de quitter. Dans I'exemple que nous donnons 
plus loin, du texte est dessin^ en style gras. Si nous ne retablissons pas le style normal, 
surprise ! Les titres de fenetres sont a leur tour dessin^s en gras, et meme les differents 
controles (nous ne l'avons pas dit, mais les cases de fermeture et de zoom, 
notamment, sont vues par le Window Manager comme des caracteres, et non comme 
des images : il appelle DrawChar pour les dessiner !), 
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Remarque tres im porta ntc Si cette procedure doit appeler une fonction C norm ale 
defmie par l'application et qui comporte des arguments, il est imperatif de passer les 
arguments par leur adresse et non par leur valeur, ta page directe utilised par la 
procedure etant difterente de celle utilised par l'application. Voir comment nous 
avons passe' nos arguments dans I'exemple complet. 

• Dessiner directement dans la zone d'informations 

La procedure prec£dente est appel^e uniquement quand le Window Manager 
decide qu'il y a utility & I'appeler. II serait done illusoire de croire que parce qu'on va 
changer le contenu de wlnfoRefCon, la zone va etre mise a jour en tenant compte de 
la nouvelle valeur. Et comme il n'y a aucun moyen 6vident de provoquer son appel, 
malheureusement, il va falloir « transpirer r>. 

Pour se mettre dans le bon grafport avec les bonnes coordonndes, le Window 
Manager nous offre la procedure StartlnfoDrawing. Deux arguments : I'adresse d'un 
rectangle dans lequel on va nous retourner le rectangle definissant la zone d'informa- 
tions (dans le bon systeme de coordonnees) et un pointeur designant la fenetre oil on 
va dessiner. 

Pour quitter cet environnement et revenir dans quelque chose de plus sain, on 
appellera la procedure EndlmfoDrawing, sans argument. 

Entre ces deux appels, ['application dessinera le contenu de sa zone d'informa- 
tions, comme si elle 6tait dans la procedure appelee par le Window Manager, avec 
interdiction d'appeler la moindre routine du Window Manager dans cet environne- 
ment, sous peine de plantage assure 1 ! 

Facile, nous direz-vous. Certes. Mais dessiner directement dans une zone 
d'informations, e'est comme dessiner directement dans le contenu d'une fenetre. En 
cas d'evenement de mise h jour, il n'y a plus personne, et on reste devant une portion 
de fenetre desesperement blanche. Puisque e'est la procedure appelSe par le Window 
Manager et elle seule qui gere la mise a jour de la zone d'informations, il faut lui faire 
savoir ce qu'elle aura a redessiner pour etre en phase avec l'application. D'oii 1'idee 
d'gerire une fonction de dessin unique, appetee k la fois par la procedure automatique 
et par l'application entre StartlnfoDrawing et EndlnfoDrawing. C'est ce que nous 
avons fait dans I'exemple complet : notre procedure type Pascal infoRect et notre 
fonction C Ajustelnfo appel lent toutes les deux la fonction C desslnfo, les arguments 
etant passes par des adresses, et non par des valeurs. Et le champ winfoRefCon est 
ajuste en permanence. 

■ En dehors de toutes ces routines, le Window Manager nous offre un dernier 
moyen de connaitre le rectangle definissant la zone d'informations (toujours dans les 
coordonnees locales de la fenStre avec origine en haut II gauche de la region contour) : 
la procedure GetRectlnfo. Memes arguments que pour StartlnfoDrawing. 

Remarque Dans tout ce que nous venons de dire, si la fenetre ne possede pas de 
zone d'informations, le rectangle retoume' est vide (ses quatre coordonnees sont a 
zero). II est Evident qu'il vaut mieux ne pas essayer de dessiner dans une zone 
d'informations inexistante ! 



Quelques routines supplementaires 

• Nous avons dit que le Window Manager dessinait ses fenetres dans un grafport II 
lui, le Window Manager port. Pour ecrire a notre tour dans ce grafport, nous pouvons 
recuperer un pointeur, grace a la fonction GetWMgrPort, sans argument. Dans ce 
port, coordonnees locales et coordonnees globales sont egales. 

• II existe une fonction, Desktop, que le Window Manager utilise de maniere 
interne pour faire toutes sortes d'operations concemant le bureau {e'est-a-dire le fond 
d'ecran, la oil l-'ind Window retourne wlnDesk) : 
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- lui soustraire une region (par exemple la barre de menus systeme) ; 

- lui a j outer une region (apr£s deplacement d'une fenetre, par exemple) ; 

- lui donner un nouveau motif de dessin ; etc. 

Nous n'entrerons pas dans les details, mais il faut bien en toucher un mot, car 
plusieurs exemples dans cet ouvrage utilisent une forme particulate de eette fonction, 
justement pour redessiner le desktop. Nous avons employe quatre variantes dans ees 
exemples : 

void Paint( J; 

DesMop(5, Paint); r utilise une procedure tte dessin 7 

Desktop) 5,0x4 000 0088); r utilise I'entree 8 de la table de couleurs utilisee 7 

Desktop(5, 0x400001 34); f des points: 3 est la couleur de devant, 4 celle de derriere '/ 

Desktop(5,0x400Q0234); r des lignes: 3 est la couleur de devant, 4 celle de derriere 7 



La premiere dessinera un fond qui peut representer n'importe quoi, par exemple 
une ceuvre d'art ou la photo digitalisee de Jean-Louis Gassee, sur lequel viendront 
s'mstaller menus et fenetres. Plus modestement, la deuxitbme se contentera de donner 
un fond de couleur uniforme, couleur a choisir parmi les seize possibles (en mode 320) 
de la palette en cours d'utilisation. La troisi^me dessinera des points regulierement 
disposes (couleur de « devant ») sur un fond uniforme (couleur de « derriere »). La 
quatritbme idem mais avec des lignes horizontals. 

• Ouand il y a plusieurs fenetres a l'£cran, le Window Manager en garde trace dans 
une liste. On a vu que la fenetre du premier plan etait r£cup£rable par FrontWindow. 
Pour r^cuperer les autres, dans l'ordre des plans, on pourra utiliser la fonction 
GetNextWindow. On lui passe un pointeur sur une fenetre, et elle renvoie un pointeur 
sur la fenetre situ^e dans le plan suivant, ou z6ro-long s'il n'y a plus de fenetre 
derriere. 

On peut envoyer une fenetre derriere une autre fenetre, si cela se r£veie 
necessaire, il suffit pour cela de passer deux pointeurs a la procedure SendBehind : le 
second designe la fenetre qu'on veut envoyer derriere, le premier designe la fenetre 
derriere laquelle 1'autre sera envoyee (la valeur moins-deux-long signifiant dans ce cas 
derriere toutes les autres fenetres, au dernier plan). Si on a touche a la fenetre du 
premier plan durant cette operation, les 6v£nements d'activation adequats seront 
jg£n£r£g. 

Pour amener une fenetre au premier plan, on utilisera exclusivement SelectWin- 
dow, Cette fonction g£n£rera correctement les £v£ne«ients d'activation et de 
deactivation, de telle sorte qu'il y aura toujours une fenetre (et une seule) « mise en 
lumiere » a l'^cran. 

• La fonction PinRecf permet de determiner quel point appartenant a un rectangle 
est le plus proche d'un point quelconque. On passe en argument 1'abscisse et 
l'ordonn£e du point quelconque, ainsi que le pointeur sur rectangle, et la fonction 
retourne le point recherche (dans un entier long). Si le point quelconque appartient au 
rectangle, c'est ce point qui est retourne. Sinon, les regies suivantes sont appliquees 
(en appelant h et v les coordonnees du point argument et left, top, right et bottom les 
coordonnees du rectangle) : 

- si h < left, elle retourne la coordonnee horizontale left ; 

- si h > right, elle retourne la coordonnee horizontale right- 1 ; 

- si v < top, elle retourne la coordonnee verticale top ; 

- si v > bottom, elle retourne la coordonnee verticale bottom-1. 

Pour que cela fonctionne, il faut evidemment que le point et le rectangle soient 
donnes dans le meme systeme de coordonnees. 

Cette fonction est ideale pour contraindre un objet quelconque a rester dans un 
rectangle donne, quelle que soit la position du curseur, a I'interieur ou a 1'exterieur de 
ce rectangle. 
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Exemple complet de manipulation multifenetres 



L'exemple suivant est destine a illustrer un certain nombre de routines du Window 
Manager. II fait grandement appel a la gestion des menus deroulants, que nous 
etudierons dans le chapitre VI. 

L'application gere quatre fenetres qui lui sont propres, et peut ouvrir les fenetres 
d'aceessoires de bureau (sans gestion du copier - coller). 

La fenetre est la plus complete : elle possede une barre de litre , avec case de 
fermeture et case de zoom, une zone d'informations, deux banes de defilement et une 
case de controle de taille. Tous ces controles sont geres, a l' exception des barres de 
defilement, puisque nous n'utilisons pas TaskMaster. Le contenu de cette fenetre est 
constitue' de rectangles multicolores imbriques. La zone d'informations recoit un 
message qui change en fonction de la position de la souris : si la fenetre est active, la 
zone d'informations signale si le pointeur se trouve dans sa region contenu, dans sa 
region contour, dans la barre des menus ou ailleurs hors de la fenetre ; si la fenetre est 
inactive, le message dit simplement que la fenetre est non active. Dans son principe, la 
gestion de ces messages s'apparente tout a fait a celle des pointeurs changeant de 
forme : on memorise la region precSdente, on calcule la region actuelle d'apparte- 
nance et si la region a change, on affiche le nouveau message. La complication 
provient du fait que l'affichage s'effectue dans la zone d'informations. 

La fenetre 1 possede une barre de litre avec cases de fermeture et de zoom, et une 
barre de defilement horizontale avec case de controle de taille. On remarquera que 
cliquer dans cette case n'a pas le meme effet si la fenetre est a sa taille maximale ou 
non ! Dans un cas, elle est consider^ vraiment comme une case de controle de taille 
(FindWindow retourne wlnGrow), dans 1'autre cas, elle est considered appartenir au 
contour, comme la barre de defilement (FindWindow retourne tvlnFrame). Est-ce un 
bogue de la version 1.03 du Window Manager, auquel cas il est possible que cette 
fenetre fonctionne parfaitement avec une version future, ou est-ce normal ? Dans tous 
les cas, le probleme est regie par 1'utilisation de TaskMaster. Le contenu de cette 
fenetre est constitue d'ellipses multicolores imbriquees. 

La fenetre 2 est la fenetre la plus simple qu'on puisse imaginer : c'est un simple 
rectangle, sans aucun contrdle. Son contenu est constitue de rectangles arrondis 
multicolores imbriques. 

La fenetre 3 illustre le concept de fenetre d'alerte, qui peut etre deplacee n'importe 
oil k partir de sa region contour. Son contenu est constitue d'arcs multicolores 
imbriques. 

Le champ d'utilisation libre de chaque fenetre (wRefCon) contient le numero de la 
fenetre tel que nous venons de le definir. C'est grace a ce champ que la fonction qui 
dessine les contenus saura faire la difference. 

Le menu Fichier permet d'ouvrir chacune de ces fenetres. Des qu'une fenetre est 
ouverte, 1'article correspondant dans le menu est estompe, de telle sorte qu'il est 
impossible de l'ouvrir de nouveau. La commande Fermer de ce menu agit sur la 
fenetre du premier plan, indifferemment qu'il s'agisse d'un accessoire ou d'une des 
fenetres precedentes (dans ce dernier cas, 1'article permettant de l'ouvrir est de 
nouveau active). 

Le menu Visibles gere la visibility des fenetres : il suffit de cocher un article pour 
rendre visible la fenetre correspondante, de retirer la marque pour la rendre invisible. 
Les fenetres non ouvertes ont leur article estompe de telle sorte qu'on ne peut agir sur 
leur etat visible ou non ! 

Le menu Active permet de rendre active la fenetre de son choix, y compris les 
fenetres invisibles (mais pas les fenetres fermdes). Jouer avec ces deux menus en 
apprend plus que cinquante lignes de cet ouvrage ! 
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C', Fichier Visibles Bctive DeskTt^p 




update TrntST* 1B853 FindWindow = * 13 
Desac.fen3 i 1B8M0 / Ch=D 1BF0D 
Bctiv.fenO o 1B8M3 / Ch=P 



FlRure V.I3. Ecr*n tirt dc 1'ixemple. 

Enfin le menu DeskTop agit sur la representation du fond d'exran. On peut 
l'effacer (il devient tout blanc), jouer avec les differentes options (couleurs solides, 
points, lignes) et enfin en faire un magnifique paysage, dont les couleurs sont plus 
reelles en mode 640 qu'en mode 320. Notons que le fichier sur disquette qui contient 
cette image s'appelle Fondecran et doit se trouver dans le merne dossier que 
['application qui ('utilise (notion de prefixe 1 geree par ProDOS). N'importe quelle 
autre image fera 1'affaire, pourvu qu'elle porte ce me me nom. En particulier en 
mode 320, toute image d'ecran creee par GS-Paint. 

Les evenements de type fenetre sont affiches directement sur le desktop. Un 
compteur de temps ddfile en permanence. Le message precise le type d'evenement, la 
fenetre touchee et la date relative a laquelle il intervient. Pour les evenements 
d'activation et de deactivation, I'Stat du bit ChangeFtag est donn£ (0 s'il est a zero, 2 
s'il est position^). On verra ainsi qu'il ne fonctionne pas comme annonc£ dans 
l'Event Manager ! 



#include <tools.h> 
iinclude ontete h> 



r definition des termes en gras */ 
T definition des termes en italique 7 



#dofine mode 1 

char Menu! [ ] - 
char Menu11[] . 
char Me nu1 9[ ) - 
char Menu2[ ] - 
char Menu21[] . 
char Menu22( j ■■ 
char Menu23[ j < 
char Menu24[ j 
char Menu25[ j i 
char Menu26[ ] 
char Menu29[ j . 
char Menu3[ ] - 
char Menu31[ ] 
char Menu32[ j 
char Menu33[ j 
char Menu34[ j 
char Menu39[ ) . 
charMenu4[] - 



I- si mode 320, 1 si mode 640 V 

r declaration des menus deroulanls V 
•>@\VXN1-; 
i "- A propos de fenStres..A\N2S7VD"; 

■> Fichier \\N2"; 
. "- Ouvrir Recfl\N260*0 ■; 
.-- Ouvrir Oval\\N261*1 '; 
. ■- Ouvrir RRecrAN262*2 "; 
i *- Ouvrir Arc\\N263V*3 "; 
. "- Fermer f«netre\\N265V"Fr; 
. "■ QuitteA\N266*Qq"; 

•> Visibles\\N3"; 
. "- Rectangles\\N300D"; 
. "- Ova1es\\N301 D"; 
. "- Root. arr.\1M302D': 
. ■- Arcs\\N303D\ 

"> Active \\N4': 
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char Menu41[ ] - "- Rectangles\\N310D" 
char Menu42[ ] - '- Ovales\\N31 1 D"; 
char Menu43[ j - "- Rect. arr.\\N312D"; 
char Menu44[ j - "- Arcs\\N313D"; 
char Menu4S( ]■"."; 
char MenuSfj = "> DeskTop WN5"; 
char Menu^I ] = "- Effacer\\N321V": 
char MenuS2[ ] - "- SolideW322"; 
char Menu53[ ] - *■ Points\W323"; 
char MenuS4[ j = "■ Lignes\\N324-; 
char Menu5S( j . "- DessinWJ325"; 
char Menu59[ ]-".'; 



tfdefine iOuvnr 260 

#cfcfine iFermer 265 

#define iQuitter 266 

#define iVisibles 300 

#define i Active 310 

#define iEf facer 321 

#define iSolide 322 

#define iPoints 323 

#de(ine iLignes 324 

fdefine iDessin 325 



r definition de quelques constantes V 



r les messages a afficher dans la zone d'inforrnation 7 



char MessOf ] - "Fenetre non active"; 

char Messlj j - "Dans la region contenu"; 

char Mess2[ j - "Dans la region contour": 

char Mess3[ ] - "Dans la barre des menus"; 

char Mess4[ j - "Hors de la lenelre"; 

int colfen( ] - {0,0x0F00,0xO20F,0xF0F0.0xO0F0}: f couleura des fenetres 7 

void infoRect( ); t declaration d'une fonction 7 

ParamList maFenO - /* definition de la fenetre contenant les rectangles */ 

{ sizeof(Pa/amiisf), OxDDBO, "M4 Rectangles ". 0L. 
{40.2,1 50.302+300*mode), colfen, 0, 0, 
200, 300+500*mode, 0, 0, 
4,10,40, 100, 
0L, 12, 0L, infoRect, 0L, 
(40820,130, 196+250*mode}, -tL, 0L }; 

ParamList .maFenl - r definition de la fenetre contenant les ovales */ 

{ sizeol (ParamList). OxCDAO, "\10 Ovales ", 1L, 
{30, 10.150, 310+250*mode}, colfen. 0. 0. 
120, 300+250*mode, 120, 300+250"mode, 
4, 10,40,100, 
OL, 0. OL, 0L, 0L, 
{50,40,120, 230+250*mode}, -1 L, 0L }: 

ParamList maFen2 - r definition de la fenetre contenant les rectangles arrondis */ 

{ sizeof(ParamList). 0x0020, ~, 2L, 
{0,0,0,0}. 0L, 0, 0, 
100,160+250*mode,0,0, 
0,0,0,0, 

0L, 0, 0L, 0L, 0L, 
{SS.100,155, 260+250*mode}, -1L, 0L}: 

ParamList maFen3 - r definition de la fenetre contenant les arcs "/ 

[ sizao^ParamLisf), 0x20 AQ, "", 3L, 
[0,0,0,0}, OL, 0. 0, 
1 00 , 1 80+250" mode ,0 ,0 , 
0,0,0,0, 

0L, O. OL, 0L. 0L, 
{6O.12O.160, 300+250*mode), -1L. 0L): 



, 
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void 


Paint{): 


Handle 


hd: 


Handle 


rgncont; 


Handle 


rgnstruc; 


Rea 


rectMenu; 


TaskRec 


lache; 


Pointer 


fen(4] ■ {OL.OL.GL.OL} 


Pointer 


wind; 


Pointer 


defPort; 


kit 


hMBar: 


M 


col, con , col2; 


int 


incSc - TRUE ; 



r dessinera la desktop 7 

r handle sur I'image du desktop */ 

r region contenu de la fenetre 7 

" region structure de la londtro V 

r rectangle contenant la barre des menus */ 

T ce que manipute GetNex (Event '/ 

r pointeurs sur fenetre V 

f la fen§tre courante */ 

f le grafport par defaut */ 

r hauteur de la barre des menus 7 

r couleurs du desktop 7 

." indicateur de fin de boucle */ 



/*'"' PROGRAMME PRINCIPAL ' 



main() 



int mylD; 

char msg[10]; 



r identitiant de I'applicatiori 7 



mylD - debut_appl(mode); 

hdl . NowHandl»(0x8000L, mylD. 0k0010. OL); /* allocation d'urt handle de 32K */ 
Loadfhdl.HyFondecran"); r chargement de ('image fond d'ecran */ 

PlaceMenus{ ): f installs la barre des menus 7 

FlushEvents(f ven/Eve/ll, 0) : f fait le vide dans la file d'evenemenls 7 

defPort - GetPort( ); I" sauvegarde le grafport par defaut 7 



do { 

Ajuslelnfo( ); f ajuste le texte dans la zone d'informalion * 

SystemTask( ); /* pour les accessoires de bureau periodiques 7 

SelPort{defPort); t on va ecrire directement sur le desktop 7 

s pri ntt{msg , "%! x" ,Tlc kCo un t{)) : /* o n 6crit le co mpteur de ta mps 7 

Mov«To(240 , 1 87) ; Dra wCStri ng (msg) ; 
if(!GetNextEvent(Fve/y£venf, fitache)} continue; 



switch (tache. what) 



r que I evenement A trailer? 7 



case MovseDown : r un die souris 7 

sourisDans(Fln«IWI ndo w{& wind , tache. where)) : 
break: 



case Key Down: r une louche enfoncee */ 

if (tache. modifiers & Apple Key) f touche Pomme enfoncee 7 

Menu Key(&tache, OL) ; f on invoque un menu deroulant. . 

indie - ExecMenu (tache. TaskData): /* . ..voir chapitre VI 7 

} 
break: 



case UpdateEvt : 

maj Fen{tache . message) ; 



f une fenetre a mettre a jour 7 



break: 

case ActivateEvt : f une fenStre a actrver ou a disactiver 7 

actFe n(tac he . message) ; 

break: 
) 



while(indic): 
quitter(mytD); 



T on quitte I'application de maniere standard 'f 
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r "* FONCTION PLACEMENUS: installs la bane des menus * 
PlaceMenus( ) 



lnsortMenu{NewMenu(Menu5), 0); 
lnsortMenu(NewMenu(Menu4), 0); 
Jns*rtMenu(NewMenu(Menu3), 0); 
hsertMenUiNewMenuiMnnu?), 0); 
lns*rtMenu(NewMenu(Meraj1), 0); 
FixAppleMenu(l); 
hMBar = Fix Menu Barf ): 
SetRect(SrectMenu, 0, 0, 1000, hMBar); 
Draw Men uBar(); 



r installation des divers menus 7 



r ajout des accessoires de bureau */ 

r calcul des dimensions de la barre 7 

I" ce rectangle contient la barre des menus 7 

r dessin de la barre */ 



/"*" FONCTION EXECMENU: repond au choix d'un article de menu ""' 
int ExecMenufart, menu) f retoume FALSE si quitter est choisi 7 



int art: 
int menu; 



r article choisi 7 
r dans ce menu 7 



int mark; 
char msg[30]; 
int ind; 

if (art>255) switch (art) 

{ 

case iOuvrir: 
case iOuvrir+1 : 
case iOuvrir+2: 
case iOuvrir+3; 

ouvre(art-iOuvrir); 

break; 

case iFermer: 

ferme(FrontWlndow( )) ; 
break; 



f voir la chapitre VI pour comprervdre cette fonction 7 



/* ouverture d'une fenetre 7 



f fermeture de ta fenetre de premier plan 7 



case iQuitler: 
return FALSE ; 
break; 



r signale la fin de I'application 7 



case iVisibles: 
case iVisibles+1 ; 
case (Visibles+2: 
case iVisibles+3: 

ind - art - iVisibles; 

mark = GetltemMark(art) ; 

if (mark) HioWlndow(fenpnd]); 

else ShowWIndow(fen[ind]); 

CheckMltem(!mark, art); 



r gestion des articles du menu Visibles */ 



r I'article porte-t-il une marque? 7 
f oui. on rend la fenetre invisible 7 
T non, on rend la fenetre visible 7 
f on met ou on enleve la marque 7 



CheckMltem(MLS£, iActive+ind); f on enldve la marque dans le menu Active 7 
break: 



case i Active; 
case iActive+1: 
case iActive+2: 
case iActive+3: 

ind - art - i Active; 

if (fen(ind) !- FroMW!ndow( )) 



r gestion des articles du menu Active 7 



r si la fenetre n'est pas deja active,. . 7 
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SelectWi ndow( fen[ind]) ; 
break: 



r ...on la rend active V 



CaS Srpls.CWnOOOOFF); f f *»* <*»" deviant tout Wane 7 



break; 



col = (col+1)%16: 

Desktop(5.0x4u000000+col*0x11); /* le fond d'ecran prend une couleur solide / 

break; 

case i Points: 

coll -(ooh+1)%16; 
col2 = (coE-1) %16; 
Desktop(5,0x40000100+coir0x10+col2); f lond d'ecran: un nuage de points / 

break; 

case iLignes: 

coll .(col1+1)%16; 
col2 = (col2-1)%16; 
Dosktop{5.0x40000200+col1*0x10+col2);r fond d'ecran: raye honiontalement / 

break; 

case iDessin: . 

Desktop (5 .Paint); f le fond d'ecran est un veritable dessin / 

break; 



else if (art>0) OpenNDA(art); r ouverture accessoire de bureau 7 

if (art) HlllteMenu( FALSE, menu); 
return TRUE ; 



r"' FONGTION OUVRE: ouverture d'une fenetre appartenant a I'application / 

ouvre(ind) 
ind; 

if (fenpnd] I- OL) return; r la fenetre est deja ouverte (test normalement inutile) */ 
else 

if (ind ==0) f fenetre contenant les rectangles 7 

lenpnd] - NewWlndow(&maFenO); f on I'ouvre et on memorise... 7 

rgncont - GetContRgn(fenpnd]); /* . . sa region contenu / 

rgnslruc - GetStructRgn(fenpnd]): /* ...et sa region contour 7 

efee if (ind == 1) fen[ind] . NewWindow(SmaFenl); T ouverture fenetre 1 7 

else if (ind -- 2) fenpnd] = NewWindow(&maFen2); f ouverture fenetre 2 1 

else if (ind =- 3) fenpnd) = NewWindow(5maFen3); C ouverture fenetre 3 / 

EnableMltem(iActive + ind); T I'article correspondant (menu Active) rendu actif I 
EnableMltem<iVisibles + ind); r I'article correspondant (menu Visibles) rendu actil / 
CheckMltemfTRLIE, iVisibles + ind); /* la fenetre est marquee visible dans la menu / 
DisableMltem(iOuvrir + ind); f I'article permettant I'ouverture de la fenetre estompe I 

I 



r*" FONCTION FERME: termeture d'une fenStre (application ou accessoire de bureau) ' 



...,- 
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ferme(port) 

Pointer port; /* pointeur sur la fenetre a termer V 

I 

int ind ; 

if (port =- OL) return; /* rian 4 termer! 7 

else if (GetWKlnd(port)) CloseNDAbyWlnPtr(port); r* fermefure tenetre systems 7 

else 

{ 

ind - (int) GetWRefCon(port); r de quelle tenetre s'agit-il? */ 

CheekMltemfFALSE. iVisibles + ind}; r on retire la marque disant qu'elle est visible.. 
DlsabteMltem(iVisibles + ind); /* . . .et on estompe I' article 7 

CheckMltem(FALSE, iActive + ind); f on retire la marque disant qu'elle est active... 
DisabloMltem(iActive + ind); f ...et on estompe ('article 7 

EnableM!tem(iOuvrir + ind); f on retablit la possibilite d'ouvrir la tenetre 

fen[ind] = OL; r ...on perd sa trace... 7 

CloseWindowfport); f ...eton la forme */ 

) 
I 

/**"* FONCTION MAJFEM: mise a jour du contenu d'un© tenetre / 

majFen(port) 
Pointer port; F pointeur sur la fenetre a rafraichir */ 

{ 

int num: 

char msg[30]; 

SetP o rt( de [Po rt) ; /* o n va ecri re sur le desktop 7 

num - (int) GetWRefCon(port) ; r on repere le numero de la fenetre. . . 7 

sprintf(msg, "update fen%d k %lx",num.tache.tvflen); 

MoveTo(5,175); DrawCString(msg) ; r . . et on affiche le message de mise a jour 7 

BeginUpdate(port); r debut de la mise a jour 7 

SetPort(port); f on va dessiner dans la bonne fenStre 7 

dessine(port, num); 

EndUpdate(port); /* fin de la mise a jour 7 

/*"" FONCTION ACTFEN: activation ou dSsactivation d'une fenetre *****/ 
actFen(port) 
Pointer port; f pointeur sur la fert#tre a activer ou desactiver 7 

I 

int ind: 
char msg[50]; 

SetPort(defPort); r on va ecrtre sur le desktop 7 

ind - (int) GetWRefCon(port); r on repere le numero de la fenetre 7 

if (tache.mooffisra & ActsveFtag) r si activation 7 

I 

CheckMltem( TRUE, iActive + ind); p ... fenetre cochee (elle devient active!) 7 

sprintffmsg, 7\ctiv.fen%d a %lx / Ch-%d\ 

ind, tache.wften, tache. modifiers & ChangeFlag); 

MoveTo(5 -, 199); DrawCSlri ng(msg); /* message d'activatio n 7 

else r si desactivation . . . 7 

{ 



WINDOW MANAGER I 159 



CheckM I tem( FALSE, i Active 4. ind); F ...fenetre non cochee (elle devient inactive!) 7 
spfintf(msg, "Desac.fen%d a %lx / Ch=%d", 

ind, tache.wAen, tache.mooWe/s B ChangsFiag), 
Mov»To(5 , 1 87) ; Dra wCString(rnsg) : r message de desacti vatio n 7 

) 



/***** FONCTION DESSINE: dessine le content! des fenetres *****/ 

dessine(por, n) 

Pointer por; P pointejr sur la fenetre a dessiner 7 

int n; Cn est le type du dessin 7 

i 

Reef r; /* rectangle 7 

long dataSize; 

int i = 1; 

dataSize - GetDataSlze(por); .■" la taille des donnees 7 

SetRecti&r. 0. 0, dataSize); F attention au raccourci! V 

whilo(EmptyRect(«r)) I* on dessine tanl que le rectangle n'est pas vide 7 
{ 

SetSolldPenPat(i) ; F on change la couleur du crayon 7 

if (n — 0) PalntRect(&r); F on paint un rectangle... 7 

else if (n — 1) PalntOval(Sr); P ...ou un ovale... 7 

else if (n -- 2) PaintRRect(&r,4Q,2Q) ; P ...ou un rectangle arrondi. ,. 7 

else PaintAre(£r, -1 35, 270) ; /* . . .ou un arc 7 

i - (i+1 )%16; F la couleur sera differente k I'etape suivante 7 

lnsetRect(&r, 7*(mode+1), 7); F le rectangle sera plus petit a r6tape suivante 7 
) 



/**"" FONCTION SOURISDANS: reponse k un die souris ****7 
sourisDans(code) 
int code; P code retoume par FindWindow 7 

I 

char msg[20]; 

SetPort(defPort) ; F on va ecrire sur le desktop. . , 7 

sprintf(msg, "FindWindow = $%4x ", code); 

MoveTo(16Q,175); DrawCStrlng(msg); F ...le code retourne par FindWindow 7 

if (code^cO) SystemCllck(&tache, wind, code); F gestion d'un accessoire de bureau "I 

else switch (code) 

case wtnMenuBar: F gestion das menus deroulants 7 

MenuSetectf&tache, 0L); 
indie = ExecMenu(tache.TaskData); 
break; 

case wlnContent : F clic dans le contenu d'urte fenetre 7 

if (wind I. FrontWindowf. )) Set«ctWlndtow(wind); 
break; r on la selection™, si nScessaire 7 

case wlnDrag : F la fenitre va changer de position 7 

if (wind (= FrontWlndow( ) && l(tache.mooWfers & AppleKatf) 

SelectWlndowfwind); F elle n'est pas selectionnie si Pomme est enfoncee V 
DragWlndow(0, tache.iv/*™, 0, 0L, wind): 
break; 
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ease wlnGraw : r la fenetre va changer do tailte 7 

I (wind !■ FrontWIndow( )) SeleetWindow(w!nd); 
else 

Slz»WIndow(GrowWlndow(507/node+1), 50, tache.wnsre. wind), wind); 
break; 

case wlnGoAway ; r la fens tie va etre lermee 7 

if (TraekGoAwayjiache.ivnere, wind)) femie(wind); 

break. 

case wlnZoom : r la fenetre va etre zoomee 7 

if (TirakZo©m(tache. where, wind)) ZoomWlndow(wind); 
break: 

case wlntnh : /* die dans la zone d'informalion. rien de bien fantastique! 7 

if (wind I- FrontWlndew< )) SeiectWIndowfwind); 
break; 

case wlnFrama : 

if (wind !- FrontWindpwr )) SetaclWIndowTwind); 

else ; r frustration supreme: on ne gere pas le defilement! 7 

break; 

t 



/**"* FONCTION AJUSTINFO: ajusle la lone d'informalion 

en fonclion de la position du curseur *****/ 

Ajustelnlo( ) 

{ 

static Pointer AncMess; r le precedent message gere 7 

Pointer Mess; f le message a gerer 7 

long vad ,var2; r deux reservations de place V 

long pi; /■ un point deguise en entier long 7 

fleer r; r un rectangle 7 

if (FrontWlndow( ) — 0L || (en[0J — 0L) 

return; r la (enetre n'est pas ouverte, rien a fairei 7 

if (!(G«tWFrame(fen[0]) & 0x0020)) return; r idem si la fenetre est imisibtel 7 
if (Front Wndow( ) != fen[0[) Mess . MessO: f la fenetre n'est pas active 7 
else 
{ 

SetPort(fen[0]); r on fixe le bon grafport 7 

GetMoLiselSptj; I* position du pointeur, coordonnees locales... 7 

LocalToGlobal(Spt); r ...traduites en coordonnees globales 7 

if (PilnRgnjSpt, rgncont)) Mess - Messl ; r pointeur dans la region contenu 7 

else il (PtlnRgn(&pt, rgnstruc)) Mess ■ Mess2: f pointeur dans la region structure 7 
else if (PttnRect(&pt, IreclMenu)) 

Mass - Mess3. r pointeur dans la barra des menus 7 

else Mess - Mess4; f pointeur ailleurs 7 

} 
if (Mess -- AncMess) return; /* la pointeur n'a pas change de region, on ne fait rien 7 

SetlnfoRefCon(Mess, fen{0]): /* on fixe la valeur a passer a la procedure gdree par le WM '/ 
SlartlnfoDrawlng(Sr, fen[0]j; r on va dessiner directement dans la zone d'informalion */ 
varl - (long) Sr; var2 • (long) Mess; 

desslnfo{&varT. Ivar2); /* on passe des adresses, et non directement des valeurs 7 
EndlnfaDr»w1ng( }; f on a fini de dessiner dans la zona d'informalion */ 

AncMess - Mess; 



1 PROCEDURE INFORECT: appelee par le Window Manager 

pour dessiner la zone d'informalion ' 
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pascal void infoRect(bar, data, wnd) 

long bar. data, wnd: 

I 

desslnfo(&bar, &data); F on passe des adosses, pas des valeurs! 7 

1 

/***** FONCTION DESSINFO: dessine la zone dinformation ***"/ 



desslnfo(pr, mess) 



nxt 
iong 



r adresse d'un pointeur sur rectangle 7 

f adresse d'un pointeur sur chains de caracteres 7 



x,y,PL.PH,GL,GH; 
msg[40]; 



f intermediates de calcul pour te certtrage du texts 7 



EraseRectfpr); 

if {'mess -» OL) return; 

SetForeColori(mode ? 15 : 9); 

SetBackCotor(mode ? :4); 

SetTextFace(1): 

MoveTa((*pr}->left 1 (*pr)->top); 

CStringBounds(*mess,Sri; 

GL - (*pr)->rjght - f pr)->left; 

GH = (*pr)-> bottom - (*pr)->top; 

x - r.left - (*pr)->Ieft; 

y ■ r.top - (*pr)->top; 

PL . r right ■ r.left; 

PH - r. bottom - r top; 

Move((GL-PL)#-x, (GH-PH)/2-y); 

DrawC Strlngf mess) ; 
SetForeCotor(O); 

SetBackColor(IS). 
SetTextFace(O): 



F on efface la zone d'information 7 
F s'il nV a rien a ecrire, on ne va pas plus loin 7 
F couleur des caracteres V 
F couleur du fond des caracteres */ 
F on ecrira en gras V 
F le crayon est place en haut a gauche de la zone 7 



F voir le chapitre III... 7 
,.ou ces calculs son! expliques " 



F le crayon est plac£ de telle sorte 

que le lexte est centre 7 
F le message est dessine 7 
F les caracteres seront de nouveau noira. . . 7 
F ...sur fond blanc... 7 
F . , .et de style normal "/ 



/""* FONCTION LOAD: lit un fichier et charge le bloc repere par un handle ""7 



Load(PicDest, path) 



Handle 

Pointer 



PicDest; 
path; 



F handle {deja alloue) sur les donnees 7 
F chemin d'accds aux donnees sur disque V 



id: 

HLock( PicDest); 
id - o pen (path, <f); 
read(id, "PicDest. 0x8000); 
close (id): 
HUnlock(PicDest); 



F identifiant fichier 7 

F le bloc est verrouitle 7 
F open est la fonction C d'ouverture de fichier 7 
F read est la fonction C de lecture de fichier 7 
F close est la fonction C de fermeture de fichier 7 
F le bloc est devenouille 7 



' PROCEDURE PAINT: sera appelee par le Window Manager 

pour dessine r le desktop / 



pascal void Paint( ) 
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PaintDesklop(8hd1, ShMBar); 



r on passe des adresses, pas des valeurs 7 



/***** FONCTION PAINTDESKTOP: dessine le desktop ' 

PaintDesktop(adhdl, hMB) 



*adhdl; 
•hMB; r 



r adhdt points sur un handle 7 
de ta variable nontenant la hauteur de la barre des menus 7 



Loctnfo 
fleet 



T une pixel image el son erwironnement */ 
f le rectangle de destination 7 



HLock('adhdl); f le bloc est verrouille pendant le transfer! */ 

source PorfSCfl . mode « 7 ; Tie mods de resolution (0 ou ISO) 7 

source. baseAddr - "adhdt f I'adresse de la pixel image 7 

sour ce . rowBytes -160 r 1 60 octets par ligne - ecran complet en largeur 7 

SetRect(soufce.BoundsHec/, 0, 0, 320*(mode+1). 200); /* ecran complet 7 

SetReetjSr. 0, -(*hM8), 320*(mode+1). 187); /"decalage pour tenir compte 

de la barre des menus 7 
PPToPort(&source. &r, 0. 0, 0); /* transferl de I'image dans le grafport courant */ 



HUntockfadbdl); 



f maintenant, le bloc peut etre deverrouill^ 7 



Exemple complet 

des coordonnees globales et locales 

Cet exemple ouvre deux fenetres k l'£cran, dans lesquelles on ne peut rien faire. 
Quand le pointeur est dans la zone contenu de la fenetre active, il prend la forme 
d'une petite croix. Sinon il garde sa forme habituelle de fleche. Dans la barre de 
menus (vide de menus), on affiche en permanence la position de la souris, I gauche 
dans le systeme de coordonnees globales (origine en haul a gauche de l'eeran), a 
droite dans le systeme de coordonnees locales (origine en haut a gauche du rectangle 
contenu de la fenetre active, puisque nous veillons k ce que le grafport courant soit 
celui associe' k la fenetre active au moment oil nous ricuperons les coordonnees du 
pointeur). 




Ftgsrc V.14. Genu tir* dc l'c 
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Amusez-vous a activer une fenetre puis 1'autre : les coordonnces globales lie sont 
pas affectees, les coordonnces locales oui. On peut dCplacer les fenCtres. Faites sortir 
la ft* net re active sur la gauche du bureau, afin de voir I'abscisse des coordonnces 
locales supeneure & celle des coordonnCes globales... On peut fermer les fenetres. 
Ouand il n'y en a plus, les coordonnces locales sont prises a partir du Window 
Manager port, et on peut constater qu'elles sont Cgaies aux coordonnces globales : 
1'origjne des deux systemes coincide. 

A titre de curiositC, le bureau est multicolore. Au lieu de notre procedure de dessin 
simpliste, n'importe quelle image (erait ['affaire ! Notez Cgalement la facon d'Ccrire 
dans la barre des menus, nous referons cet exercice de style dans le chapitre consacre 
au Dialog Manager '. 

Voir les remarques donnCes dans 1'exemple complet du chapitre consacrC a 1'Event 
Manager pour compiler cet exemple. La fonction AjusteCurs a change", mais sa 
philosophie est restCe la mSme. La fonction getbits par centre est identique. 



#include <tools h> P conrient la definition des termes en gras */ 

#include «entete.h> r conrient la definition des termes en italique 7 

#define mode /" pour mode 320, t pour mode 640 7 

void lnlo{ ); P declaration procedure de dessin zone info 7 

void Paintf, ); P declaration procedure de dessin du bureau 7 



ParamLtsf ma Fenl -{ 

sizeof(PfliamLisl), QxCOBQ, *I1 1 Fenetre 1 ". 

{56, 2,187, 302+320'mode,, OL, 0, 0, 

161, 300+320*mode, 161, 300+320*moda, 

4, 16,40,160, 

OL, 30, OL, Info, OL. 

{60.20,130, 196+320*mode). -1L. OL}; 



P fenetre 1 7 



T fenetre 2 7 



Parambst maFen2 - { 

sizeof(ParamList), OjfCOBO, "\11Fen§tre 2*. 2L, 

{46, 2,187, 302+3207node), OL, 0, 0, 

161 , 300+320* mode, 161 , 300+320* mode, 

4,16,40,160, 

OL, 20, OL, Info, OL, 

{80.40.145. 216+320*moete), -IL, 0L); 

P curseur en forme de croix {definition non structuree) '/ 
char croixj ] - | 5.0.3.0. P 5 lignes de 3 mots */ 

O.OxFO.O, 0,0,0, /"image 7 

0,OxFO,0,Q,0,0, 

0xFF,0xFF,OxFO,O,0,0, 

0,OxFO,0.0,0,0, 

0,0xF0,0.O.0,O. 

0,0.0,0.0,0, r masque *i 

0.0.0,0.0,0, 

0.0,0,0,0,0. 

0,0,0,0,0,0, 

0,0,0,0,0,0, 

2,0,2,0 } : r point chaud 7 

int cotfen[ ] - {O,OxOF00,0xO2OF,0xFOFO,Ox0OF0); P table de couleurs pour fenetres '/ 

TaskRec tache: P oe que manipute GetNextEvent 7 

Pointer fenl , fen2, wind; P pointeurs sur fenetre 7 

int indie ■ TRUE; P indicate ur de fin de boucle 7 

Pointer rrnsnuPort: P adresse du Menu Manager part'/ 

Handle cant: P handle sur la region contenu de la fenfitre active */ 

Pointer arrow; P pointeur sur le curseur en forme de Heche 7 

r — PROGRAMME PRINCIPAL **"7 
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} 



mainO 

X; P code retourne par GetNextEvent 7 

mylD; P idenlifiant de I'application */ 

mylD - debut_appl(mode}; P initialisations diverses V 
S«Fr8meColor(colfen,0L); P couleurs par defaut pour toutes les fenetres 7 

Desktop(S, Paint); P une procedure de dessin pour la bureau 7 

RuBhEyenta(EveryBvBnt, 0); P plus d'evenement dans la file 7 

fenl - NewWindow(&maFen1 ); P creation de la premiere fen4tre 7 

fenZ = NewWlndow(&maFen2); f creation de la seconds fenetre V 

menuPort = GetMenuMgrPortQ; r le port dans Sequel les menus sont dessines. . 7 

S«P ort(me nuPort} ; P . . .devie nt le pa rt par de fau I . . . 7 

SetTextMode(O) : f ■ ■ avec mode de transfert Copy */ 

arrow m GelCureorAdr( }; P on garde I'adresse du curseur syst&me 7 

do { 

x - GetNextEventtEVeryEvenr, itache); P 1'evenement suivant */ 

AffichCoord( ); P affichage des coordonnees '/ 

AjusteCurs{ ): P dessin du curseur en fonclion de sa position 7 

if(bt) continue; P pas d'evenement signifiealif a traiter 7 

switch(tache. what) 

{ 

case MouseDown : 

sourisDans(FlndWlndow(£wind, taehe. where)); P rfjponse a un die souris 7 

break; 

case Key Down : 

indie - FALSE ; P une touche enfoncee, on sort! */ 
break: 

case UpdatsEvt i P on ne traite pas les ev^nements de mise a jour */ 
break; 

case ActivateEvt : P activation ou desactivation de fenStre '/ 

ifjtache. mod/fore & ActiveFlag) P si c'esl une activation... */ 
cont = GetContRgn(tache.messao»); P ...on calcule la region contenu.. . 7 

break; P ...de la nouvelle fenetre active 7 

) 

while{ind«c) ; P fin de la bo ucle d "byb n« me nt 7 

quitter(mylD); P on quitte I'application 7 



P"" FONCTION SOURISDANS: reponse a un die souris **•**/ 
sourisDans(code) 
| nt code ; P code retoume par FIndWI ndow 7 

[ 

switch(code) 

case wlnCont&nt : P dans le contenu dune fenfitre... 7 

if {wind != FrontWlndow{ )) 

SelectWindow(wind): P .on la selectionne si necessaire 7 

break; 

case wlnDrag : P dans la barre de litre */ 

if (wind 1= FrontWIndowf ) &fi !(tache.mod/fiere& AppteKe/)) 
SelectWindow(wind); P on selectionne si la touche 

Pomme n'est pas enfoncee... 7 
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DragWi ndow(0. tache. wherv, 0, OL, wind); f . . ,et on deplace la fenetre 7 
break; 

case wlnGoAway : P dans la case de fermeture 7 

Clo5eWindow(wind); f on ferme la fenetre courante 7 

break; 

case wlntnto : /* dans zone dlnformation : comme dans contenu */ 

if (wind !. FrontWimdow< )) SeleetWlndow(wind); 

break; 
1 
J 

/****' FONCTION AFFICHCOORO: affichage das ccordonnees dans la barre de menus *"**/ 
AffichCoord( ) 

long pt ; t point declare 1 comme un entier long 7 

char msg[10]: 

if (FrontWlndow{ ) !- OL) F sll reste une fenStre ouverta. . . V 

SetPort( Front Win dow( )): /• . . on rend actiMe port de la f en4 ire du pre mier plan . . . 7 

else SetPort(G«tWMgrPort( )) ; f .. .sinon le port du Window Manager 7 

GetMousef&pt); I" on recupere les coordonnees du pointeur dans ce port 7 

SetPort(menuPort); I* on rStablit le port du Menu Manager 7 

sprintf(msg,"%4d -,getbits(pt,31.16)); r on ecrit I'abscisse. 7 

MoveTo(240 ,10): DrawCStrl ng( msg) ; 

sprintf(msg . "%4d " , getbi ts (pt, 1 5 , 1 6) ) : /*.. .et t'ordo nnee des coo rdon nees locales 7 

MoveTo(2Q0,10); DmwCString(msg); 

sprintf(msg,"%4d ",getbits(tache.wr>ere,31 .1 6)); f on ecrit I'abscisse, .. 7 

MoveTo(10,10); DrawCString(msg); 

sprintf(msg,"%4d ",getbits[tach9.wf)ere,15,16}); /* . . .et I'ordonnee 

des coordonnees globales '/ 

MoveTo(50,10); DrawCStrlng(msg); 
} 
/***" FONCTION AJUSTCURS: change la forme du pointeur en fonctbn de sa position / 

AjusteCursf ) 

static modif; f l*6tat precedent 7 

jnt ind; /* l'6tat oeurant 7 

ind - PtInRgn(& tache. whom, co nt); f* TRUE si le pointeur est dans la region contenu 7 

if (ind =- modif) return; f pas eu de changement? On quitte directement */ 

if (ind) SetCursor(croix); I* sinon on change le curseur... 7 

else SetCursor(airow); 

modif = ind: /* ...et on memorise le nouvel elat 7 



( 

int 

Rect 



r"" PROCEDURE PAINT: difinit le dessin du bureau ' 
pascal void Paint( ) 



SetRect(&f, -20,0, 0,200); 
for(i-0: i<16*(mode+1); ++i) 

{ 

QHsetReet(&r,20,0): 
SetSolidPenPat(i). 
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PalntReet(ir); 
} 
) 

/**"* PROCEDUHE INFO: definil le dessin da ta zone ^information *""/ 

pascal void lnfo(bar,data.wnd) 
long bar.data.wnd; 

i 

r on ne dessine rien dans la zone d'information V 

} 

/""* FONCTION GETBITS 1 

getbits(x,p,n) /* prend n bits a parBr de ta position p dans un entiar long 7 

unsigned long x; 

unsig ned int p,n; r p pe ut prendre les valeurs 3 1 ,30 1,0*/ 

r n doit 6tre compris entre 1 et 1 6 7 

{ 

return) (x»(pr-1-n)) & ~(~0«n) ); F retourne un entier sur 16 bits 7 

} 



CHAPITRE VI 



MENU MANAGER 



PRINC1PES GENERAUX 

Les menus deroulants constituent Tune des fondations de I'interface utilisateur 
Apple. lis sont caracterises par une barre des menus qui contient le titre de chacun des 
menus. Quand le bouton de la souris est pressi sur 1'un de ces titres, le titre s'inverse 
et le menu de>oul£ apparalt avec toutes ses options : les articles. II restera visible taut 
que le bouton ne sera pas lache\ II suffit alors de faire glisser la souris sur les differents 
articles pour operer une selection, et de lacher le bouton pour lancer la commande ; 
l'article s^lectionne clignote et le menu disparait. Le titre du menu reste inverse 
jusqu'a ce que ["execution de la commande soit terming. Si aucun article n'^tait 
selectionne au moment du lacher du bouton (pointeur en dehors du rectangle du menu 
deroule ou au-dessus d'un article estompi), le menu disparait et il ne se passe rien. De 
la sorte, 1'utilisateur peut a tout instant consulter les menus, sans consequence aucune 
sur le deroulement de 1'application. 



6 Fichier 

"1 — I - 

menu titrt dt 
pomme menu 



Present Futur ^^jfemT" 5 




Couper 
Copier 



| Effacer'* | 



article selectionne 



menu deroule 



Figure VI. 1. 1« piincipaiuc coBMpts. 



C'est le Menu Manager qui se charge de toute la gestion des menus dSroulants. 
Grace a lui, le programmeur va pouvoir crder facilement une bane de menus 
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conforme S 1'interface utilisateur, modifier I'apparence de ces menus en cours 
d'application et detecter quel article I'utilisateur a sefectionne afin de dedencher la 
commando adequate. 

Les titres contenus dans une bane de menus sont generalement actifs, mais 
peuvent etre temporairement desactives. Dans ce cas, le menu peut toujours etre 
d^roule, mais son titre et tous ses articles sont estomp^s, done impossibles a 
selectionner. 

Une barre de menus peut apparaitre n'importe oil a 1'eeran. Toutefois, on evitera 
soigneusement d'abuser des barres de menus susceptibles de desorienter I'utilisateur. 
Sauf necessite absolue, une application ne devrait utiliser qu'une seule barre de 
menus : (a barre sysieme, qui apparait en haul de l'ecran sur toute sa largeur, et que 
rien ne peut venir recouvrir, hormis le pointeur. Pour respecter I'interface, la barre de 
menus systeme devrait contenir au moins trois menus : le menu tf (accessoires de 
bureau), le menu Fichier (acces disquette) et le menu Edition (couper-copier-coller). 
Les menus propres a ('application ne viennent qu'ensuite. En mode 320, cela laisse 
peu de place ! 

Un article standard dans un menu peut etre soit le texte d'une commande, soit une 
ligne divisant des groupes d'articles. Un article peut etre cocM (d£signant ainsi la 
selection permanente d'une option) ou non coche, peut posseder un equivalent clavier 
(1'article peut alors etre selectionne par Pomme-caractere) ou non. II existe la 
possibility de cr£er des menus non standard (par exemple pour offrir un choix de 
couleurs ou de trames, dans les applications graphiques), C'est alors le programmeur 
qui prend une partie de la gestion de ces menus personnalises a son compte. 

Note Les premieres versions du Menu Manager n'offrent pas le defilement 
automatique des articles quand leur nombre dans un menu excede le maximum 
autorise. Les versions futures le gereront comme il est gere sur Macintosh, sans 
qu'aucune modification n'ait k etre apport£e a ce qui est dit dans ce chapitre. 



UTILISATION DU MENU MANAGER 



Generalites 

Condition prealable : avoir initialise QuickDraw (dessin des menus) et I'Event 
Manager (interaction avec I'utilisateur). Gen£ralement, le Window Manager aura 
ggalement deja £16 initialise. On peut alors initialiser le Menu Manager par la 
procedure MenuStartUp. 

Le programme commence par definir chaque menu (son titre et ses articles) avec 
New Menu, et l'insere dans la barre de menus avec InsertMenu. L'affichage de la barre 
de menus se fait grace a DrawMenuBar. 

Quand un evenement cause par I'utilisateur interviendra dans un menu, MenuSe- 
lect et Menu Key sont les sous- programmes qu'il faudra utiliser pour y repondre. En fin 
de commande, HiliteMenu sera appeUs pour rendre a la barre des menus son aspect 
normal. 

II existe toute une panoplie d'appels qu'on peut utiliser occasionnellement : 
insertion et destruction d'articles dans un menu, modification des couleurs par defaut 
utilisees pour dessiner les menus, modification de ('intitule d'un article, deactivation 
d'un article, cochage d'un article, style non standard dans l'£criture d'un article, etc. 



Definition d'un menu 

Un menu est dfifini par une chaine de caracteres ob&ssant a des regies strides. 
Void un premier exemple de definition de menu (il contient trois articles) : 
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> Titre 1\N2 > est un caractere special (suivi d'un Wane) 

- Article 1 .1U\I301 ■ est aussi un caractere special (suivi dun Wane) 

- Article 1 .2VJ302 

- Article 1 .3VN303 

. est egalament un caractere special 

Dans la chaine tie caracteres qui ddfinit un menu, chaque ligne, terminee par un 
Retour-ligne (code ASCII 13 decimal) ou par un caractere nul (code ASCII 0), 
repfesente un titre de menu ou un article. Le premier element de la chaine de 
caracteres servira pour chaque titre (id le caractere >), Le premier element de la 
ligne suivante (e'est-a-dire le premier caractere apres le code ASCII ou le Retour) 
servira pour chaque article (ici le caractere -). Enfin, un element differant des 
caracteres de titre et d'article d^marrera la derniere ligne, signifiant la fin de la 
definition du menu (ici le caractere .). Ainsi, trois caracteres particuliers sont definis, 
en fonction de leur position dans la chaine. Les caracteres >, - et . ne sont done 
absolument pas imposes. Juste apres le caractere de titre ou d'article, une position doit 
etre reservee (ici nous avons laisse un blanc, mais le caractere est indifferent). Le 
Menu Manager utilisera cette position pour stacker la longueur du titre ou de I'article, 
de maniere interne, ce qui permettra la modification ulterieure de ces libelled. La 
definition de menu suivante est strictement equivalente a 1'exemple precedent : 

$STiitii 1\N2 $ est un caractere special (suivi d'un caractere bidon) 

-"Article 1 .1\N301 = est aussi un caractere special (suivi d'un caractere bidon) 

—Article 1 2\N302 

==Article 1 ,3\N303 

$ $ est egalement un caractere special 

Le caractere special marquant la fin de definition d'un menu peut etre le me me que 
celui marquant le titre. L'important en realite est que le caractere marquant les 
articles soit different des deux autres caracteres de tete. 

Certains caracteres speciaux peuvent ou doivent Stre ajoutes a un titre ou a un 
article pour changer leur apparence ou introduire des elements particuliers. Ces 
caracteres commenceront par le caractere V 

Lists des caracteres speciaux : 

\ d£but des caracteres speciaux ; 

* suivi de deux caracteres, I'article possedera un equivalent clavier avec ces 

caracteres ; 
C suivi d'un caractere, I'article sera coclfe avec ce caractere ; 
B I'article apparaitra en caracteres gras ; 

I I'article apparaitra en caracteres italiques ; 
U I'article apparaitra en caracteres soulignes ; 
V placera une ligne de separation sous I'article (evite ['utilisation d'un article 

separd) ; 
D estompera I'article ou le titre, le rendant ainsi inactif ; 
X utilisera une couleur de remplacement durant la selection, et non ['inversion 

standard (par XOR) ; 
N suivi d'un nombre decimal, numero du titre ou de I'article ; 
H suivi d'un nombre hexadecimal, numero du titre ou de I'article. 

Tons ces caracteres speciaux peuvent affecter la definition d'un article, seuls \, D, 
X, H et N peuvent affecter celle d'un titre. Leur ordre apres \ n'a aucune importance. 
La nunferotation du titre ou de I'article est obligatoire. 

Remarque Le caractere \ ne pourra jamais faire partie du texte d'un titre ou d'un 
article : i) marque toujours le d£but des caracteres speaaux. 

Pour creer le titre du menu * (accessoires de bureau), on utilise le caractere @, 
precede du caractere de titre et du caractere reserve^ de longueur, et suivi du 
caractere \. Cette sequence de caracteres doit etre rigoureusement respectee : aucun 
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blanc supple mental re ne doit etre inse>£ avant et apres @. Ce menu devrait tou jours 
possdder la directive X (couleur de remplacement en cas de selection), car la pomme 
apparait toujours en couleur dans la barre de menus. 

Voici un deuxieme exemple de definition de menu (le menu 4 ) : 

»@\N1X menu #, porlant le numero 1 

-A propos de...WN2S6 article 256, sous lequel est place une barre de separation 

Reste a traduire en langage C ces types de chames de caracteres. Si le caractere nul 
n'avait pas £\6 admis pour separer les differentes « lignes », on aurait Ste oblige de 
coder les definitions de menus en assembleur ! Heureusement, ce ne sera pas 
necessaire. 

Voici comment on pourrait £crire les deux menus donnes en exemple prec£dem- 
ment : 

eharmenu1[] -"»@WIX\ 
charmenu11(]- "--A propos de..A\VN256"; 
char menulx! j ■ "."; 
char menu2[ ] = "»Titre 1WNI2"; 
char menu21[ ) = "--Article 1.1WN301": 
char menu22[ ] =■ "--Article 1.2WN3Q2": 
char menu23[ ] - ' -Article 1.3WN303": 
char menu2x[ j = "."; 

On notera la double barre oblique pour autoriser le caractere Y Dans ces 
definitions, chaque ligne est terminee par le caractere nul, puisque nous avons affaire 
a des chaines de type C. Les pointeurs menul et menu2 serviront a rep^rer I'ensemble 
du menu et de ses articles, les autres pointeurs ne seront presque jamais utilises, 

II faut egalement savoir que le caractere standard qui serf au cochage des articles 
porte le code ASCII 18 decimal (soit 22 en base 8). Pour definir un menu dont 1'un des 
articles est cochd a la creation, on ecrira done quelque chose comme : 

char menuS 1[ ] - "--Article cocheA\N421 C\22"; 
char menu32[ j = " -Article non cocheA\N422"; 



^Article coche 

Article non coche 



Figure VL2. Le corkage standard. 

Nous verrons d'autres exemples de definition de menus en fin de chapitre et tout au 
long de cet ouvrage, ainsi que leur manipulation. 



Identification de titres et d'articles 

Les titres et les articles sont numerates dans la definition de chaque menu. Aucune 
limitation ni regie n'est imposee dans la numerotation des titres (pourvu qu'elle tienne 
sur deux octets). On utilisera g^neralement les numeros 1 a n (n 6tant le nombre de 
menus), sachant que deux menus differents dans une meme barre ne peuvent porter le 
meme numero. Par contre, le num£ro des articles utilises par une application doit Stre 
compris entre 256 et 65534, les identifiants compris entre 1 et 249 £tant reserves aux 
accessoires de bureau, et les numeros 250 I 255 devant theoriquement servir aux 
articles suivants : 
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250 Annuler (premier article du menu Edition) 

251 Couper (deuxieme article du menu Edition, equivalents clavier Xx) 

252 Copier (troisieme article du menu Edition, equivalents clavier Cc) 

253 Coller (quatrieme article du menu Edition, equivalents clavier Vv) 

254 Effacer (cinquieme article du menu Edition) 

255 Fermer (article necessaire du menu Fichier) 

Ces articles peuvent etre qualifies de sp£ciaux, car ils devraient toujours appartenir 
a une application qui gere les accessoires de bureau, et etre actifs quand la fenetre de 
premier plan est une fenetre systeme. Le fait de leur imposer un identifiant permettra 
a la fonction TaskVlaster de prendre completement en charge la reponse a leur 
selection par 1'utiiisateur des lors qu'elle concernera un accessoire de bureau. 

Deux articles ne peuvent porter le meme numero, a I'interieur d'une barre, meme 
s'ils sont dans des menus difterents. Ce sont ces numeros qui permettront d'identifier 
l'article ou le menu selectionne par I'utilisateur. Aucune obligation n'est faite dans un 
menu d'ordonner les articles dans l'ordre croissant de leur identifiant, meme si la 
logique nous invite a proceder de la sorte, ainsi que nous 1'avons fait dans les exemples 
precedents. 



Lignes de separation 

II est sou vent interessant de separer les articles d'un menu en groupes homogenes, 
afin de faciliter k I'utilisateur le repfirage de certaines fonctionnalites. Le Menu 
Manager nous offre deux manieres d'agir : 1'utilisation d'un article qui sera une ligne 
de division (cet article devra etre estompe et porter son propre identifiant), ou 
['utilisation du caractere special V dans la definition de ['article, provoquant une ligne 
de soulignage de la largeur du menu. Choisir entre les deux sera souvent une affaire de 
gout personnel... a moins que le nombre eLev£ d' articles dans un menu ne contraigne a 
1'utilisation de la deuxieme solution. 

On utilisera les deux types d 'instructions suivants : 

char manu53[ ] - "- Article 3WNSD3V"; 
char menu54[ j - "- Artide 4WN504"; 
/•ou V 

char menuS3[ ] * *- Article 3WN503"; 
char menu54[ j - "- -WN504D"; 
char menuSSJ j = "- Article 5WN505" ; 

Notons dans le deuxieme cas que le nom de l'article est limite a un simple caractere 
(le tiret), ce qui suffira a cr6er une ligne de separation complete. L'option D fera de 
cette ligne un article non s£leetionnable. Dans ce cas, et dans ce cas uniquement, 
l'article pourrait porter le meme identifiant que celui qui le precede, mais inutile de 
jouer avec le feu ! 















Article 2 
Article 3 




Article 2 
Article 3 

Article 5 




Article 4 

















Figure VI.3. Les lignes de separation. 
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Equivalents-clavier 

Dans la definition d*un menu, a chaque article peuvent Etre associes deux 
6quivalents-clavier. La definition : 

char menu3S[ ] - "--Poursuivre la recherche\\*RrN281 "; 

signifie que 1'artiele nuraero 281 et qui porte le titre « Poursuivre la recherche » 
possede deux equivalents-clavier : Pomme-R et Pom me -r. Le premier equivalent 
s'appelle Equivalent primaire, le second s'appelle equivalent alternatif. Quand on ne 
desire pas d'Equivalent alternatif, on laisse obligate! re ment un blanc a la place ; le 
caractere special * doit toujours Eire suivi de deux caracteres Equivalents-clavier, le 
premier Etant significatif. 

De maniere Evidente, on ne devrait pas trouver deux Equivalents-clavier identiques 
dans deux articles diffE rents. Aucun com role n'est fait par le systeme pour empEcher 
cette anomalie. 

Pourquoi deux Equivalents-clavier '.' Le Menu Manager ne convertit pas les 
minuscules en majuscules quand 1'utilisateur invoque une commande & partir du 
clavier par une combinaison Pomme-touche. Les deux equivalents-clavier seront done 
en rEgle generale (quand il s'agira d'une lettre) le caractere majuscule et minuscule 
correspond ant. 



Notion de barre de menus courante 



GEnEralement, une application ne possede qu'une barre de menus : la barre 
systeme, qui prend place tout en haut de I'Ecran, oil elle occupe gEnEralement les 
treize premieres lignes. Dans certains cas particuliers, une application peut gErer 
d'autres barres de menus en plus de la barre systEme, par exemple une barre de menus 
dans la zone d 'informations de chaque fenetre. Certaines routines du Menu Manager 
s'appliquent a la totality d'une barre de menus (par exemple InsertMenu ou 
DrawMenuBar) et agissent sur la barre de menus courante. Quand il n'y a que la barre 
systeme, cette barre est toujours la barre courante. Quand par centre il y a plusieurs 
barres de menus, SetMenuBar permet d'en sElectionner une avant d'appeler certaines 
routines. Cette bane sElectionnEe devient alors la barre courante. 



Definir ses propres menus 

Signalons pour etre complet que si la maniere utilisEe par le Menu Manager pour 
dessiner les menus ne vous convient pas, par exemple parce que vous dEsirez creer un 
menu de couleurs ou de patterns, chose impossible par la procedure normale, vous 
pouvez definir vos propres procedures pour dessiner un menu et sElectionner ses 
articles... Nous vous renvoyons a la documentation technique Apple pour de plus 
amples renseignements sur ce sujet. 

La possibilite de definir ses propres menus ne doit pas etre confondue avec la 
possibilite de jouer sur les couleurs utilisees par les procEdures standard. Comme pour 
tout ce qui est systEme, le Menu Manager utilise exclusivement le noir et le blanc pour 
dessiner ses menus (texte noir sur fond blanc, avec une exception, la pomme !), ce qui 
limite les surprises en cas de manipulation des tables de couleurs par I 'application. 
Nous verrons par l'exemple qu'il est facile d'utiliser autre chose que le noir et blanc. 
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EXEMPLES D'UTILISATION 



Mise en place dune barre de menus systeme 



extern char menu1[ ] 
extern char menu2[ ] 
extern char menu3[ j 



f definition dy menu 4 7 
f definition du menu Fichier ' 
r definition du menu Edition * 



T initialisations precede ntes */ 
MenuStartLtp(mylD, zeropg); f initialisation du Menu Manager */ 

r suite des initialisations 7 

lnsertMenu(NewMenu(menu3). 0); f troisiame menu dans la barre 7 

lns*rtMenu{NewMenu(menu2) , 0) ; f deuxiSm© menu dans la barre 7 

1nsertMenu{NewMenu(menu1 ), 0); /* premier menu dans la barre 7 

FixAppleMenu(t); f mise en place des accessoires de bureau 7 

RxltenuBar( ); /* taille par defaut pour la barre de menus 7 

DrawMenuBar( ); r dessin de la barre de menus 7 

Pour pouvoir etre utilise, le Menu Manager doit etre initialise. La procedure 
MenuStartUp assure ce travail : elle cree une barre de menus systeme vide, en fait la 
barre de menus courante. et dessine eette barre vide. Si le Window Manager est 
initialise, la place sur l'ecran pour la barre de menus sera reserved, et aucune fenetre 
ne pourra venir la recouvrir. MenuStartUp possede deux arguments ; le premier est le 
numero identifiant Implication (tel qu'il est retourne par la fonction MMStartUp du 
Memory Manager). Le second designe une fronttere de page dans la banque 0. Le 
Menu Manager a besoin d'une page complete dans la banque pour pouvoir 
fonctionner. Consulter le chapitre XII pour une vision d'ensemble de ['initialisation 
des outils. 

La fonction NewMenu reserve de la place pour un menu et ses articles, decrits 
parfaitement par la chalne de caracteres sur laquelle pointe son argument. Elle 
retourne un handle sur cette iiste, et c'est ce parametre qui servira ensuite a localiser 
ce menu. Dans l'exemple, les handles sur chaque menu sont passes en argument de la 
procedure Insert Menu, mais ne sont pas memorises. 

La procedure InsertMenu permet d'ajouter un menu a la barre de menus courante 
(par delaut la barre systeme). Le premier argument est un handle retourne' par la 
fonction NewMenu, le second un numero d'ordre. Dans l'exemple, signifie que le 
menu viendra a gauche de tous les menus deja presents dans la barre. On aurait pu 
proc£der differemment ; 2 par exemple aurait signifie que le nouveau menu devait 
s'inserer a droite du menu portant 1'identifiant 2. En procedant de droite a gauche 
comme dans l'exemple, on n'a pas a se poser de questions sur le deuxieme argument 
de InsertMenu : il est systematiquement nul. 

FixAppleMenu n'est pas une routine du Menu Manager, mais du Desk Manager. 
Sa fonction est d'ajouter au menu dont 1'identifiant est passe en argument (de 
preference le menu i , merci !) les accessoires de bureau disponibles sur la disquette. 
Si l'application decide de ne pas supporter les accessoires de bureau, cette routine ne 
doit pas etre utilisee. L'argument qu'utilise cette procedure designe 1'identifiant du 
menu * . Les accessoires auront des numeros cons£cutifs a partir de 1, (Voir le 
chapitre X). 

La fonction FixMenuBar calcule les dimensions que va utiliser la barre de menus 
courante ainsi constitute (elle retourne la hauteur de la barre de menus, valeur dont 
une application a rarement besoin, voir l'exemple de fin de chapitre), et DrawMenu- 
Bar la dessine a l'ecran. 
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Reponse a une selection d'article 
par I'utilisateur utilisant la souris 

TaskRec lac he; C tachs est un Task record 7 

T GatNeXtEvont a retoume un svenement de type McusaDown 7 
r FlndWlndow nous apprend qui! a eu lieu dans la barre systems 7 

MenuSelact(Stache, OL); 

Ex ecM enu( tache TaskOa fa); I* la fonctbn ExecMenu gere la selection de I'utilisateur 7 

r suite de 1'application 7 

ExecMenujart, menu) 

irtt art, menu; 

[ 
Switch(art) 

( 

case 256: r* un case pour la commands correspondant a ['article numero 2567 

r execution de la commands 7 
break; 

case 257 : I* un case pour la commands correspondant a I'article numero 257 7 

r execution de la commande 7 
break; 

... f etc un case pour chaque article ds la barre de menus 7 

} 
if (art) HIH»M»nu{FAl.SE, menu}; 

} 



L'Event Manager a retoume' un evenement de type Mouse Down (le bo u ton de la 
souris a eti enfonci) par I'intermfdiaire de GetNextEvent, et le Window Manager 
nous a appris que cette action a eu lieu dans !a barre de menus systeme (Find Window a 
retoume' la valeur wlnMenuBar). L'application doit alors appeler MenuSelect, 
procedure qui va prendre en charge la gestion complete des manipulations de menus : 
inversion du titre selections, dessin du. menu deroule, inversion des articles en 
fonction de la position du pointeur, etc. Cette procedure neeessite deux arguments : le 
premier est un pointeur sur TaskRec, le second un handle dfisignant la barre de menus 
(zero-long signifie barre systeme). Le TaskRec sert a la fois d'input et d'output h la 
procedure : 1'input sera le r£sultat du dernier GetNextEvent, 1'output dSsignera le 
menu et I'article selectionne's par I'utilisateur (partie TaskData du TaskRec). A la suite 
de cet appel, la barre de menus designee par le second argument devient la barre 
courante. 

Si pour n'importe quelle raison il n'y a pas eu de selection, le numfiro d'article 
retoume" est nul. Sinon. l'application doit repondre a 1' intervention de I'utilisateur en 
executant la commande select ion nee, puis rendre au titre de menu son aspect normal 
(il reste inverse pendant toute la duree de la commande) grace k la procedure 
HiliteMenu. Cette procedure admet deux arguments ; le premier indique si on doit 
contraster le titre (TRUE) ou si on doit le rendre normal (FALSE), le second est le 
numero du menu dont le titre est concerne. 

L'exemple utilise une astuee propre au langage C pour retrouver le numero 
d'article et de menu a partir du champ TaskData du Task record. Ce type de raccourci 
est impossible en Pascal i Le champ TaskData a pour longueur 32 bits, le Menu 
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Manager retourne dans les 16 bits les plus significatifs l'identifiant du menu 
s£lectionne\ et dans les 16 bits bas l'identifiant de I'article selection^ (ou zero si rien 
n'est selectionne). La fonction ExecMenu que nous avons dgfinie recoil en argument 
cet entier long, mais le traite en reality comme deux arguments sur 16 bits : d'abord 
I'article, ensuite le menu (ne pas oublier qu'une fonction C traite les arguments dans 
l'ordre inverse de leur apparition dans les parentheses). 

Si le num£ro d' article est z£ro, aucun case ne sera selectionn£e dans notre fonction 
ExecMenu, et done aucune commande ne sera lancee. HiliteMenu ne sera m£me pas 
executed dans ce cas, le Menu Manager rdtablissant de lui-meme Taspect normal d'un 
menu quand aucun article n'est retenu, 

Remarque important* Si une application n' utilise pas d' autre barre de menus que la 
barre systeme (ou les banes systemes), elk pourra laisser TaskMaster ge^er toute 
seule les selections dans les menus. Nous verrons comment utiliser cette fonction dans 
le chapitre XI, qui lui est consacre. Par contre, 1'appel a MenuSelect est indispensable 
pour designer autre chose que la barre systeme. 

Reponse a une selection d'article 
par I'util isateur utilisant le clavier 

TaskRec tache; r lache est un Task record 'I 

r GetNextEvenl a retournd un evenement de type KayDown V 

f Paralyse a mon&S que la touche Pomme etait egalement enfonoee */ 

MenuK«y(&tache, OL). 

ExecMenu(tache.TasAData); /* la fonction ExecMenu gfere la selection de I'utilisateur */ 
F elle est commune a MenuSelect et Menu Key 7 

L'Event Manager a retourne" un evenement de type KeyDown (une des touches du 
clavier a et£ enfonc^e) par I'intermfidiaire de GetNextEvenl, et 1'analyse du Task 
record nous a appris que simultanement la touche Pomme £tait enfonc£e : I'utilisateur 
veut done s^lectionner un article d'un menu par son equivalent -clavier, L'application 
doit alors appeler MenuKey, procedure qui va rechercher a quel article correspond la 
commande invoqu£e. Cette procedure necessite deux arguments, identiques a ceux de 
MenuSelect, et retourne les memes informations que cette procedure (dans le champ 
TaskData du Task record). 

La recherche de I'article se fait en deux temps. La routine commence par 
rechercher dans tous les menus (de la gauche vers la droite) si un article possede 
i'& qui vale nt-clavier primaire correspondent a la touche enfonc^e et s'arrete des qu'elle 
en trouve un. S'il n'y en pas, elle recherche ensuite parmi les equivalents-clavier 
alternatifs. S'il n'y en a toujours pas, aucun article ne sera s£lectionne\ 

Raupel Menukey fait la distinction entre majuscules et minuscules, 1'equivalent 
alternatif a pour but principal de donner a une minuscule la m£me fonction commande 
que la majuscule. 

A la suite de cet appel, la barre de menus designee par le second argument devient 
la barre courante. 

La fonction ExecMenu appel£e dans cet exemple est commune avec 1'exemple 
precedent. Notamment, il est toujours necessaire d'appeler la procedure HiliteMenu. 



Modifications sur un menu 

• On peut changer les caracteristiques d'un menu de la barre courante grace a la 
procedure SetMenuFlag. Cette procedure reclame deux arguments : une valeur 
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prSdefinie d£signant le nouvcl etat et le numero du menu. Voici les valeurs les plus 
interessantes (celles qui concernent les caracteres speciaux \D et VX de la definition) : 

SetMenuFlag(E/jabfeMenu, n): t rend actif le menu rt (annule \Df 7 
SetMenuFIag(Dis3b/eAfanu, n); /* rend inactif (estompe) le menu n (force VD) 7 
SetMenuFlag(XOflM;(H, n);T selection par inversion (annule \X) */ 
SetMenuFlagfCo/offlepilace, n): /* selection par couleur de remplacement (force \X) */ 

Les valeurs pr£d£finies sont les suivantes : 

•define EnabhMenu 0xFF7F 

#deline DisabloMonu 0x0080 

Adeline CotorReptace OxFFDF 

#define XORhitte 0x0020 

II faut appeler DrawMenuBar pour re mi re visible a I'eeran le resultat de 
SetMenuFlag. 

Par exemple, une application peut ne pas avoir besoin de gerer le copier-coller, 
ma is possSder neanmoins un menu Edition k 1' usage des accessoires de bureau. Ce 
menu sera estompe' si 1'une des fenetres de ['application se trouve au premier plan, 
actif s*il s'agit d'une fenetre syst£me. Voir 1'exemple complet en fin de chapitre. 

Note L'action d'estomper un menu se rSpercute sur tous les articles de ce menu, qui 
apparaissent des lors egalement estompes. Cependant, I'etat reel de l'article n'est pas 
modified si bien que lorsque le menu est reactive, seuls les articles deja act if s 
auparavant le redeviendront. 

• On peut changer le titre du menu, quand ['application le justifie, dans des cas tres 
particuliers, grace a la procedure SetMenuTitle. 

Attention La chaine de caracteres constituent le nouveau titre doit etre de type Pascal. 
On peut aussi recuperer le titre d'un menu, grace a la fonction GetMenuTitle qui 
retourne un pointeur sur ie titre dont 1'identifiant est passe en argument. 

Pointer oldTitle; 

char newTilie[ ] - "\16 Nouveau titre"; /* chatne de caracteres type Pascal 7 

okfTitfe ■ GetMenuTltle(n) ; 

SetMenuTltle(newTille, n}; Tie menu n porte un nouveau titre */ 

Tl faut appeler DrawMenuBar pour rendre visible k I'ecran le resultat de 
SetMenuTitle. 

• On peut egalement vouloir changer le numero d'un menu. Rien de plus simple, 
avec la procedure SetMenuID : 

SetMenulD(m, n); r le menu n porte desormais le numero rn "/ 



Modifications sur un article 

Contrairement aux modifications sur les menus, il n'est pas necessaire de 
redessiner la barre de menus pour que les modifications sur articles soient prises en 
compte : ils seront dessin6s correctement des que le menu auquel ils appartiennent 
sera de>oule\ 

• Pour rendre actif ou inactif un article, deux procedures sont disponibles : 
EnableMItem et DisableMItem. Un seul argument : le numero de ['article considered 
Au moment de la definition, ceci se traduit par la presence ou non de \D. 
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DisableMltem(n); /* 1'article n devient estompe, done non selectionnable */ 

EnableMltem(n); /* I'article n redevient normal, selections ble */ 

• Pour manipuler la marque devant un article (article coche ou non), une seule 
procedure est necessaire : CheckMItem. Deux arguments I mi sont n£cessaires. Le 
second est le numero de 1'article ; le premier a la valeur TRUE si on veut cocher 
1'article ou la valeur FALSE pour retirer la marque. Si on essaie de cocher un article 
deja coche, il ne se passe rien, et r&ciproquement. Au moment dc la definition, ceci se 
traduit par la presence ou non de la directive \C (suivie du caractere ASCII 18 
decimal). 

int indie - TRUE; T indicateur booleen: TRUE = article coch6 */ 

f I'article n est se1ectionne\ reponse A la commands V 
case n 

indie - lindic; /* on change la valeur de I'indicateur 7 

CheckMlt»m(indic, n); f suivant la valeur de I'indicateur, on coche ou on demarque 7 

if (indie) r y a-t-il encore une marque? V 

actio nSiVrai( ); I* ...oui V 

else actions i Faux( ); /* rr .non */ 

break: 

Au lieu de gerer un indicateur precisant 1'etat coche ou non coche d'un article, on 
peut utiliser la fonction Get Item Mark, qui retourne pour 1'article donn6 en argument 
le code ASCII du caractere de cochage present, ou la valeur zero si I'article n'est pas 
coche. Si on ne se pr£occupe pas du code du caractere de cochage, on peut conside>er 
que la fonction retourne FALSE si I'article n'est pas coche, et ! FALSE (au sens C du 
terme, pas v raiment TRUE puisque tous les bits ne sont pas a 1) si 1'articie est coche. 

La procedure CheckMItem utilise exclusivement le code ASCII 18 decimal pour 
cocher un article. La procedure SetltemMark gtend ses possibility : le premier 
argument n'est plus un boolean, mais le code ASCII (quelconque) du caractere de 
cochage, la valeur zeio signifiant (comme dans CheckMItem) pas de cochage. 

Voici un exemple, gquivalant au precedent, utilisant ces deux routines. Seule 
difference : on utilise le caractere > comme caractere de cochage, 

case n: 

if (GelltemMark(n)) r s'il y a une marque. . . 7 

{ 

Seshem M erk(0 ,n) : /* on la reti re 7 

a c lion Si Fa urn' ) ■'"' et on fait ce qu'il faut 7 

} 
else f sinon... 7 

( 

SetltemMark(V.n); f on met la marque 7 



actionSiVraif ) ; t et on fait ce quil faut 7 

I 

break; 

On peut ecrire le nom de I'article avec des styles differents (standard, gras, 
italique. souligne). Au moment de la definition, ceci se traduit par la presence, 
1'absence ou une combinaison de \B ou W ou \I. On peut changer de style en cours 
de route avec la procedure SetltemStyle. Deux arguments ; le second est le numero de 
I'article, le premier 1c code du style a employer : 

SetltemStylefQ, nl); F I'article n1 est ecrit dans le style standard 7 

SetltemStyle(1 , n2), r I'article n2 est ecrit en gras, comme avec \B */ 

SetltemStyle(Z, n3): /* I'article n3 est 6crit en iteliqua, comme avec \l 7 

SetttemSt)rfB(4, n4) ; f I'article n4 est ecrit en souligne. comme avec \U 7 

SetrtemStyl»(7, n5); f Fanicte nS est ecrit en orgs llaliaue soullani , comme avec \BIU */ 
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On constate dans le dernier exemple qu'il est possible de combiner les styles, 
eomme dans QuickDraw. I] est a noter que certaines polices de caracteres ne tiennent 
pas compte du souligne, et notamment la police utilisee par le systeme, aussi bien en 
mode 320 qu'en mode 640 ! Pour retrouver le style utilise par un article donne, on 
peut appeler la fonction GetltemStyle : 

int x, y; 

x = GetltemStyle(n2); /' x regoit la valeur 1 (style gras) "/ 

y = GetltemStyle) n5); r y reeoit la valeur 7 (style gras italique souligr>4) */ 

• On peut changer le nom de Particle, quand ['application le justifie, grace a la 
procedure Set I tern Deux arguments : un pointeur sur le nouveau nom et le numero de 
l'article incrimind. 

Attention La chaine de caracteres constituant le nouveau nom doit etre de type Pascal. 
De plus, un octet en debut de chaine doit etre reserve, le Menu Manager s'en servira 
pour stocker la longueur de l'article. 

Exemple Quand une commande peut prendre deux etats, on changera son nom I 
chaque selection. 

char nom 1 [ ] - "\22- Aflicher la reg le" : 

char nom2[ J - "\21 -Masquer la regie"; 

int flag - FALSE: /* TRUE si la regie est affichee, FALSE sinon 7 

int menulD: /* I'identifiant du menu modifie 7 

T l'article n est selection^, reponse a la commande 7 
case n: 

il (flag) r la regie est-etle affichee? */ 

{ 

Setltem(nom1 , n); r oii: on change le nom de l'article ... V 

masqueO: f ,,,et on masque la regie 7 

} 

else 

{ 

Setltom[nom2, n); /* non: on change le nom de l'article... 7 

affiche( ) ; /* . . .et on affiche la regie */ 

} 
CalcMenuSlze(0, 0, menulD); T recalcute la largeurdu menu 7 
flag ■ Iflag: f on change la valeur de I'indicateur 7 

break; 

Si les libelles sont de longueur nettement differente (en pixels), il sera obligatoire 
d'appeler CalcMenuSize (voir plus loin). 

Notons Pexistence de la fonction Getltem, qui retoume un pointeur sur le nom de 
['article dont I'identifiant est passe en argument. 

• On peut changer les autres caracteristiques d'un article (YV et \X dans la 
definition) grace a ia procedure SetltemFlag Deux arguments : une valeur pred^finie 
et le numero de Particle. Voici les divers cas de figure : 

Set Item Flag( Underilem, n) ; f equivaut a forcer W 7 

SetltemFlag(WD(Jncfer/tem, n); r equivaut a annuler \V) 7 

Setlt«mFlag(XOF?rWfte, «); f equivaut a annuler \X) 7 

SeUt»mFlBg[Coforflsp!ac8, n) : f equivaut k forcer \X) 7 



Les deux dernieres valeurs utilisees ont etc vues plus haul. Les deux premieres sont 
dcfinies ainsi : 

(define Underilem 0x0040 

#de(ine NoUnderltsm OxFFBF 
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• Enfin, pour changer le numero d'un article, il suffit d'appeler Set Item ID : 
SotltemlD(m, n); /* I'arlicle n ports desormais le numero m V 



Acces aune barre de menus 

• Nous avons deja parle de la procedure InsertMenu au moment de la creation 
d'une barre de menus. C'est evidemment cette procedure qu'une application ou un 
accessoire de bureau doit appeler pour ajouter un menu supplemental dans la barre 
courante, a n'importe quel moment. Pour etre stir que le menu ajoute viendra a droite 
de tous les menus presents, on pourra ecrire : 

Insert Man u(NowMenu(menuX) ,65535) : /* rnenuX est un pointeur 

sur le menu d'identifiant X */ 

La valeur 65535 (equivalente a - 1 en representation interne) assurera la place la 
plus a droite, puisqu'aueun menu ne peut avoir un identifiant plus grand. La fonction 
New Menu, rappelons-le, reserve de la place en memoire vive pour memorises les 
renseignements concernant le menu et ses articles. Si cette allocation a deja ete faite, il 
ne faut pas la recommencer, sous peine de voir sa memoire saturer tres rapidement ! 
Logiquement, quand l'application doit jongler avec ses menus, elle conserve trace des 
handles les localisant en memoire. Si tel n'etait pas le cas, il y await encore une 
possibility retrouver le handle sur un menu grace a son identifiant par la fonction 
OtMHandle. Si nous supposons que MenuX a deja ete alloue par NewMenu, que 
nous n'avons pas garde la valeur du handle qui lui est attache et que son identifiant 
porte la valeur X, nous ecrirons pour inserer ce menu : 

ln«wtMenu(G»tMHandle{X),65535): 

La fonction GetMHandle retoume un handle sur le menu d'identifiant X, ou pro- 
long en cas d'erreur (si par exempie la fonction NewMenu n'avait jamais 6t& appelee 
pour ce menu). 

Maintenant que nous savons ajouter des menus dans une barre, il peut etre 
interessant de savoir les enlever. C'est la procedure DeleteMenu qui retire de la barre 
courante le menu dont I'identifiant est passe en argument. 

Attention Elle retire le menu, mais elle ne libere pas I'espace memoire qui lui est 
consacre, done le handle sur menu est toujours valide apres cet appel. Pour detruire 
definitivement un menu et liberer la place qu'il occupe en memoire, on utilisera la 
procedure DisposeMenu en donnant comme argument le handle du menu a evacuer. 
Le menu n'etant plus accessible, GetMHandle retournerait zero-long en cas d'appel 
pour ce menu. 

Apres avoir insere ou retire un menu, il est obligatoire d'appeler DrawMenuBar 
pour repercuter ces modifications a l'^cran. 

• Ce qu'on peut faire pour les menus a l'inteneur de la barre courante, on peut 
egalement la faire pour les articles a I'interieur d'un menu. Les procedures sont 
Insert Item et Deleteltem. 

La procedure Insert Item reclame trois arguments : 

- un pointeur sur une ligne de definition d'article (vous vous souvenez ? caractere 
special, suivi d'un caractere r£servant de la place pour la longueur, suivi du litre de 
1' article, suivi des options, et termine par le caractere nul) ; 

- I'identifiant de ['article apres lequel le nouvel article viendra s'inserer (donner la 
valeur zero pour que 1 'article soit le premier du menu, et la valeur 65535 ou - 1 pour 
qu'il soit le dernier, tout en bas du menu deroule) ; 
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- l'identifiant du menu dans lequel I'article doit venir s'inserer. 

La procedure Deleteltem ne reclame qu'un seul argument (il est toujours plus facile 
de detruire que de construire), l'identifiant de I'article a retirer de la barre de menus. 

On appellera CalcMenuSize pour laisser le Menu Manager recalculer la taille du 
menu incrimine. Trois arguments lui sont necessaires : la nouvelle largeur du menu 
(mettre pour que le Menu Manager se debrouille tout seul), la nouvelle hauteur du 
menu quand il est deroule (mettre ici aussi la valeur 0) et l'identifiant du menu. 

Notons que FlxMenuBar appelle CalcMenuSize pour chaque menu de la barre dont 
die doit calculer les dimensions, avec des nombres negatifs pour les deux premiers 
arguments, ce qui ne permet pas de recalculer une largeur de menu prealablement non 
nulle : cet appel est parfait au moment d'une creation, mais pratiquement inoperant 
par la suite ! C'est bien CalcMenuSize qu'il faut appeler ici, et non FixMenuBar 

Exemple d'utilisation de ces possibility : une application multifenetres peut 
vouloir ge"rer un menu dont les articles seraient le titre de chacune des fenetres 
ouvertes. Des que l'utilisateur ouvre une nouvelle fenetre, un article est ajoute dans le 
menu, et des qu'il ferine une fenetre, I'article correspondant est efface". 

char menu5[ ] - "»Fenetres\W5"; 

char menuS 1 [ ] - "- WN500"; 

char menu5x[ ] = *.": 

Painter fen[9]; r on autorise 9 pointeurs sur (enStre */ 

I" au d6but du programme */ 

inBertMenu(NewMenu(menu5J, -1); 

Deleteltem(500); /* quand ca marcbera! 7 

CalcMenuSlze(0, 0, 5); f reoalcule la hauteur du menu 5 7 

r l'utilisateur ouvre ia fenetre N (1£N£9) 7 

Ins«rtltem(menu51 , -1. 5); 

SBtJtBmlD{S00+N,500): /* identifiant de I'anjcle 7 

Sedtem(GetWTIt!e(fen[N-1]), 500+N); T ce qui aurait pu etre le litre de I'article 7 

Ca1cMenuSize(0. o, 5}; 

I* l'utilisateur lerme la fenetre M (1<Ms9)7 

Deleteltem(500+M); 

CalcMenuSize(0, 0, 5); 

Le principe de cet exemple est clair : on cree dans la definition du menu un article 
bidon, qu'on supprime juste apres 1'allocation du menu. Cet article servira k chaque 
insertion, mais on modifiers avant affichage son identifiant et son titre (en allant 
chercher un pointeur sur le titre de la fenetre). Pour le retrait d'un article, il est de la 
responsabilite de l'application de faire le lien entre la fenetre et l'identifiant de I'article 
qui la concerne. 

Malheuremement, tel qu'il est ecrit, cet exemple ne fonctionne pas. Deux causes a 
eel a : 

- dans sa version actuelle (1.03), le Menu Manager perd completement les pedales 
quand on supprime tous les articles d'un menu ! On ne pourra done pas supprimer 
I'article bidon d'emblee, et il faudra travailler un peu plus : le supprimer apres 
insertion du premier article valable, le retablir avant retrait du dernier article valable. 

- le passage d' argument entre GetWTitle et Setltem est impossible, a cause de 
1'octet supplemental dont a besoin le Menu Manager pour gerer le libelle de 
I'article, et que ne possede evidemment pas le titre de la fenetre. On peut penser ruser 
en laissant un blanc devant le titre de la fenetre. Malheureusement, le Menu Manager 
va mettre une valeur a la place de ce blanc, generant un caractere parasite qui 
apparaitra dans le titre de la fenetre des que celle-ci sera redessin£e ! On verra dans 
1'exemple en fin de chapitre une faeon de tourner la difficulte, en gerant deux listes de 
noms. C'est nettement plus penible, plus gourmand en place memoire, mais cela 
fonctionne sans anicroche ! 
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Remarque Si le passage d'argument entie GetWTitle et Setltem avail <st£ correct, il 
aurait tout de meme fallu faire attention, Un compilateur qui convertirait de lui-meme 
les chaines Pascal en chaines C n'apprecierait pas du tout une telle construction, qui 
conduirait au plantage assure ! (voir dans I'introduction le paragraphe consacre' aux 
chaines de caracteres). 

• Une application peut a tout instant savoir combien d'articles contient un menu, ce 
qui lui 6vite une comptabilite parallele en cas d'appels a lnsertltem et Deleteltem dus 
aux manipulations de I'utilisateur. La fonction CountMItems retourne le nombre 
actuel d'articles presents dans le menu dont I'identifiant est pass6 en argument : 

int nbArt; 

nbArt = CountMItems(5) ; r nombre d'articles du menu 5 7 



En conjonction avec I'exemple precedent, 1'entier nbArt contiendrait le nombre de 
fenetres actuellement ouvertes par l'application. Notons que dans la version 1 .03 du 
Menu Manager, cette fonction renvoie n'importe quoi ! 

• Meme si ce n'est pas sa vocation, une barre de menus peut servir a passer des 
messages. Par exemple, une application qui n'utiliserait pas les menus deroulants 
pourrait se servir de la barre systeme pour laisser & 1'ecran une sorte de signature. Un 
tel message pourrait 6tre centre. La procedure SetTitleStart permet de laisser jusqu'a 
127 pixels a blanc a gauche du premier titre de la barre. C'est une facon £l£gante 
d'ope'rer. Reeiproquement, la fonction GetTitleStart renvoie le nombre de pixels 
laisses a blanc. 

• La largeur d'un titre de menu peut etre fixee independamment des caracteres qui 
le composent (c'est pratique pour elargir un menu dont le titre serait vraiment trop 
£troit) grace a la procedure SetTitle Width. Deux arguments : la nouvelle largeur (un 
entier contenant le nombre de pixels) et ridentifiant du menu vise'. La fonction 
GetTitleWidth retourne la largeur du titre dont Fidentifiant est passe' en argument. 

Exemple On elargit le titre du menu 3 de 10 pixels, pour que I'utilisateur ait une 
surface plus grande pour selectionner ce menu. 

SefTitleWtdth(GetTlt[eWldt}i(3), 3); 

• Pour attirer l'attention sans faire de bruit, on peut utiliser la procedure 
FlashMenuBar, sans argument. Son rdle est conforme & son nom : elle va dessiner la 
barre courante avec sa couleur de selection, puis la redessiner immediatement avec sa 
couleur normale, ere' ant ainsi une sorte d'eclair en haut de I'ecran. 

• Le Menu Manager dessine ses barres de menus par 1'intermediaire d'un grafport, 
a 1'instar de tout ce qui apparait a l'eeran, II peut etre interessant d'intervenir dans ce 
grafport, par exemple pour changer la police de caracteres utilised. Un pointeur sur ce 
grafport nous est retourne par la fonction GetMenuMgrPorl, et grace a ce pointeur 
nous pourrons utiliser les routines QuickDraw adequates. Le point suivant va nous 
montrer qu'il est inutile de faire appel H cette fonction pour modifier les couleurs 
utiiisees par le Menu Manager. 

Note L'origine du Menu Manager port est en (0.0), ce qui signifie que les coordonnees 
locates et globales coincident dans ce grafport, tout comme dans le Window Manager 
port. 

• Et si nous changions les couleurs par de^faut de la barre de menus ? Rien ne nous 
empeche d'£crire nos menus en bleu sur fond jaune, le texte devenant rouge quand il 
est selection^. II suffit pour cela de passer les bons numeros de couleurs a la 
procedure SetBarColors, eu £gard a la palette de couleurs active. Et si ['application 
change de palette en cours de route, les menus changeront de couleur corre'lative- 
ment, avec le risque de ne plus etre lisibles... La fonction GetBarColors nous permet 
de connattre le nutnero des couleurs utiiisees dans le dessin de la barre active. 

La procedure SetBarColors admet trois arguments : 
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- un entier designant les couleurs « normales » : numero de couleur pour dessiner 
un texte non seiectionne (bits a 3), couleur du fond quand non seiectionne (bits 4 a 
7). Les bits 8 a 15 sont a zero ; 

- un entier designant les couleurs « en selection \X » : num6ro de couleur pour 
dessiner un texte seiectionne (bits & 3), couleur du fond si seiectionne (bits 4 & 7), 
Les bits 8 I 15 sont a zero ; 

- un entier designant la couleur des traits utilises dans le dessin des menus (cadres 
et barres de separation). Les bits 4 a 7 contiennent ce numero de couleur, les autres 
bits sont a z£ro. 

La fonction Get Bar-Colors retoume ces memes informations, mais condensees dans 
un entier long : 

- bits Ok 3 : couleur du texte normal ; 

- bits 4 a 7 : couleur du fond non seiectionne ; 

- bits 8 a 11 : couleur du texte selectionne (cas de la directive \X) ; 

- bits 12 k 15 : couleur du fond selectionne (cas de la directive \X) ; 

- bits 16 a 19 : zero ; 

- bits 20 a 23 : couleur des lignes ; 

- bits 24 a 31 : zero. 

Quand la barre de menus standard est utilisee, GetBarColors retoume la valeur 
hexadecimale 0000 0FFO, ce qui signifie que les textes sont en noir (couleur 0) sur fond 
blanc (couleur 15) en representation normale, et en blanc sur fond noir en selection 
avec la directive \X. Cela implique que dans ce cas la directive \X n'a aucune 
influence sur la representation des menus, puisque ['inversion standard des couleurs 
donnera egalement blanc sur noir. Les lignes sont tracees en noir. 

Pour ecrire en bleu sur fond jaune en « normal » et en rouge sur fond jaune en 
« selection \X », toutes les lignes etant en marron, on pourra coder (en mode 320 
avec la palette standard) : 

SetBarColors(0x009D, 0x0097, 0x0020); 

Dans ces conditions, GetBarColors retournerait la valeur hexadecimale : 0020 
979D. Quand un litre est selectionne, le bleu sur fond jaune devient marron sur fond 
orange (couleurs « inverses ») si la directive VX n'est pas presente ou qu'on a utilise 
les instructions SetMenuFlag {XORhiliie, n) ou SetltemFlag (XORhilite, n) ; le bleu 
sur fond jaune devient rouge sur fond jaune si la directive \X est presente ou qu'on a 
utilise les instructions SetMenuFlag (ColorReplace, a) ou SetltemFlag (ColorReplace, a). 

Notons que SetBarColors admet des arguments negatifs, signifiant que la valeur 
courante ne doit pas etre mod if re e. Par exemple, si nous voulons changer seulemcnt la 
couleur des lignes (orange au lieu de marron), nous ecrirons : 

SetBarColors(-1 , -1, 0x0060); 



11 faut appeler DrawMenuBar pour rendre effective la prise en compte des 
nouvelles couleurs. Notons que dans sa version 1.03, le Menu Manager ne retablit pas 
les couleurs par defaut quand la procedure MenuShutDown est appeiee, U sera done 
preferable d'ajouter ('instruction suivante en fin d'application (pour penser a cedes qui 
suivront, notamment si elles utilisent une resolution differente !) : 

SetBarColors(0x00F0, OxOOOF, 0); r rerablit les couleurs initiales */ 
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Utilisation de plusieurs barres de menus 

Quand ie Menu Manager est initialise, une bane systeme est creee, et toutes les 
actions concernant les menus viennent se rapporter a cette barre, qu'on reference par 
la valeur zero-long dans certains appels. Pour creer cette barre, MenuStartUp fait 
appel a la fonction NewMenuBar. Pour creer elle-meme d'autres barres de menus, 
I'application va elle aussi faire appel a cette fonction. 

Deux types de barres de menus sont possibles : les barres systeme et les barres 
fenetTe. Chaque barre appartient a un grafport : les barres systeme sont dessinees 
dans le Window Manager port, les barres fenetre dans le grafport associe a la fenetre 
d'appartenance. Les barres sont dessinees par defaut a partir de I'origine du grafport 
et ont generalement une hauteur de 13 pixels, done une barre systeme se situe en haut 
de 1'ecran, une barre fenetre en haut de la region contenu de la fenetre. On peut 
egalement definir une barre de menus dans la zone d'informations d'une fenetre, 
auquel cas elle n' appartient plus a son contenu, mais a son cadre... et elle est done 
dessinee dans le Window Manager port. 

• Une application peut manipuler plusieurs banes systeme, et jongler de 1'une a 
1'autre en fonction des necessites du moment. Une seule de ces barres est evidemment 
visible a un moment donne. Pour creer une barre systeme, on appelle NewMenuBar 
avec zero-long comme argument. La fonction retourne un handle qui va servir a 
repe^er la nouvelle barre. Pour dire qu'une barre devient la barre systeme, on appelle 
la procedure SetSysBar (le handle sur la barre est passe en argument, elle devient 
barre courante) et on la redessine. Pour connaitre le handle qui repere 1'actuelle barre 
systeme, on appelle la fonction GetSysBar, 

Une sequence destructions typique pour une application gSrant deux barres 
systeme pourrait etre la suivante : 

Handle barS1 , barS2; f handles sur barres systeme */ 

f debut des initialisations */ 
MenuStartUp(mylD, zeropg); 

/* suite des initialisations '/ 
barS1 - GetSys8ar( ); f handle sur la barre cr66e k I'initialisation 7 

T insertion de menus dans cette barre, par InsertMsnu 7 
RxMenuBar( ); T calcut des dimensions de la barre 7 

ba rS2 - NewMen uBar(0 L); /* no u vet I e ba r re syste m e . . 7 

SotSysBar{barS2)'. r* ...sur laquelle on va travailler 7 

T insertion de menus dans cette barre, par InsertMsnu 7 
Fix Menu Bar( ); !~ calcul des dimensions de la barre 7 

A ce stade, les deux barres systeme sont crepes, elles contiennent des menus, mais 
aucune d'elles n'est dessinee. On passera altemativement de 1'une a 1'autre par des 
appels de ce type : 

SatSysBar(barS1 ); r change la barre par defaut 7 

DrawMenuBart ): r dessine la barre par defaut 7 

Tout appel a MenuSelect ou a MenuKey avec ze>o-long en deuxifcme argument 
s'adressera a la barre systeme par defaut, fixee par le dernier appel a SetSysBar. 

• En plus d'une ou plusieurs barres systeme, une application {ou un accessoire de 
bureau) peut vouloir gerer des barres fenetres. Le mecanisme de creation est assez 
identique : on appelle NewMenuBar en donnant en argument le pointeur reperant le 
grafport de la fenetre dans laquelle on veut placer la barre de menus, on appelle la 
procedure SetMenuBar avec en argument le handle sur la barre qui devient barre 
courante, on appelle eventuellement la fonction GetMenuBar pour connaitre par son 
handle la barre actuellement courante. 

Attention II n'y a qu'une barre courante, cette fonction peut done retourner un handle 
sur une barre systeme. 
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Dans I'exemple complet qui suit, ] 'application utilise une barre systeme et une 
barre dans chaque fenetre, Notons que tel que I'exemple a £t£ congu, la barre dans 
une fenetre fait partie de sa region contenu, et non de la zone d 'informations, Cela 
impose quelques contraintes : en regie generate, i! faudra e"viter de venir dessiner par 
dessus la barre de menus, en modifiant la clip region (sauf si I'utilisateur n'a pas la 
possibility de I'ecraser, comme c'est le cas ici) ; la fenetre ne devra pas posseder de 
barres de defilement, et si elle est redimensionnable, il sera preferable de ne pas 
autoriser une largeur trop faible qui masque une partie des menus ! 

La bonne methode est evidemment de creer la bane fenetre dans sa rone 
d'in formations, oil I'utilisateur n'aura pas acces pour dessiner dessus, et qui reste fixe 
meme quand le contenu de la fenetre defile. Malheureusement, la mise en place et 
surtout la gestion d'une telle barre est relativement compliquee (Apple a public une 
note technique de huit pages pour en expliquer la mise en ceuvre). Faute de place, 
nous n'en parlerons done pas ici. 

Les menus dfiroulants sont les memes dans chaque fenetre, la definition leur est 
done commune. II n'empeche qu'ils doivent etre ger6s de maniere distincte, done la 
fonction NewMenu est appelee deux fois pour chaque menu, une fois par fenetre. 
C'est grace a cela que nous pouvons cocher les articles d'un menu d'une fenetre sans 
pour autant interferer sur le menu de I'autre fenetre. 

Pour verifier si I'utilisateur a bien clique dans la barre, on commence par recuperer 
sa hauteur (valeur retourn£e par FrxMenuBar) et on garde trace du rectangle qu'elle 
definit (en coordonnees locales, la valeur pouvant etre arbitrairement grande). Quand 
FindWindow retournera wlnContem, on appellera la fonction PtlnRect pour savoir si 
le bouton a €l€ ou non enfonce dans le rectangle (done dans la barre) pour appeler ou 
non MenuSelect. 

A titre d'experience, supprimons ce test et regardons en bas a gauche comment le 
Menu Manager reagit quand on appelle Menu Select aiors que I'utilisateur n'a pas 
clique" dans une barre de menus : il renvoie zero pour I'article seiectionne, et la 
coordonnee horizontal (locale) du die souris en numero de menu ! Aucune gene 
cependant dans cet exemple, puisque le cas de I'article nul est pr£vu dans notre 
fonction ExecMenu. 

Le but de I'exemple est de dessiner dans chaque fenetre une forme d'une certaine 
couleur, la forme et la couleur e*tant choisies dans leurs menus respectifs. Les choix 
seront stockes dans le champ wftefCon de chaque fenetre. Notons que le code de cet 
exemple n'est absolument pas optimise. On aurait pu utiliser des tableaux de fonctions 
pour faire riche et propre, mais la lisibilite" s'en serait nettement ressentie ! On notera 
la maniere retenue pour dessiner les formes et le texte d'accompagnement, fondamen- 
tale : on g£nere un evenement de mise a jour en invalidant deux rectangles, plutdt que 
de dessiner directement dans la fenetre. Ainsi, on est sur que quelles que soient les 
manipulations de I'utilisateur (activation d'une autre fenetre, masquage partiel par 
defacement, etc.), la fenetre aura toujours un contenu rigoureusement exact. Une 
fenetre dans laquelle I'utilisateur ne dessine pas, doit toujours etre remplie par 
I'intermediaire de la fonction de mise a jour. 

L'exemple est pr£sente en mode 640 (meme si I'illustration correspond au 
mode 320), ce qui nous permet d'employer des definitions de pattern dans ce mode 
(pseudo rouge, vert, bleu, jaune : un pixel sur deux est colore, I'autre est blanc, ce qui 
explique la paleur des couleurs). Element remarquable : il suffit de decaler les 
fen&res d'un pixel horizon tale me nt pour que les couleurs ne soient plus conforme a ce 
qu'on attend, puisqu'en mode 640 la couleur d'un pixel depend de sa position a 
l'ecran. On comprend mieux maintenant pourquoi DragWindow ne permet par defaut 
dans ce mode qu'un defacement de huit pixels d'un coup : c'est exactement la largeur 
de la definition du pattern, done pas de sautes de couleurs lors d'une promenade de 
fenetre ! Vous pouvez toujours essayer de changer la definition du contenu d'une 
fenetre d'un pixel, pour voir ! 

Pour faire tourner I'exemple en mode 320, i) suffit de changer la valeur de la 
constante mode au debut du programme : signifie mode 320, 1 sigmfie mode 640. 
Toutes les dimensions (fenetres, rectangles) tiennent compte de ce parametre, de 
meme evidemment que les couleurs utilisees. 
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Jean-Pierre CURCIO presente 



Pr pmifar-P. 


Forme Couleur 














R< 


•ctangle jau 


ne 



Deuxieme 



Forme Couleur 




article 31M - menu 6 



Figure VI .4. Fenetres avec une barre de menus I en mode 320) 



^include <toois.h> 
finelude -0901919.11 > 



#define mode 1 



r definition des termes en gras "I 
r definition des termes en italique V 

T si mode 320, 1 si mode 640 */ 



char Menu2[ ] • "»Jean- Pierre CURCIO presente\\N2"; 
char Menu21[ ] = "~les fenetres avec menus. ..WN271 DV"; 
char Menu23[ ] . *--Quitter\\N273*Qq"; 
char Menu29[ ]-"."; 



char MenuS[ ] = 


» Forme WN5X"; 


char Menu51[ ] = 


•--Rectangle\\N301X 


char Menu52[ ] - 


--OvalettN302X'; 


char MenuS3[ ] . 


•■-Rect. arr.\\N303X" 


char Menu54[ ] ■ 


--Arc\W304X"; 


char Menu59[ ] - 


."; 


charMenu6[] -' 


» Couleur\\N6X"; 


char Menu61[ ] = 


-Roug9\\N311X"; 


char Menu62[ ] - 


-Vert\\N31 2X": 


char Menu63[ ] = 


~8leu\\N313X"; 


char Menu64[ ] = 


--Jaune(iN314X": 


char Menu69|| - 




#define mFichier 


2 


#deline mForme 


5 


#define mCouieur 


6 


#define iQuitter 


273 


#deline iRect 


301 


#de!ine iOval 


302 


#define iRRect 


303 


#define iArc 


304 


fdefine i Rouge 


311 


#define iVert 


312 


^define iBIou 


313 


#define Uaune 


314 



r menu systemg 7 



r premier menu fenetre V 



r second menu fan§tre 7 



r definition de quelques constantes 7 



int coifen[ ] = (O,QxDFOO.Ox020F,OxF0F0,Ox00F0]; /* couleur des fengtres 7 

PammUst ma Fen 1 = [ r la premiere tenStre 7 



186 I BOlTE A OUTILS OE L'APPLE IIGS 



sizeof(ParamList), 0x80 AO, "\10 Premiere", OL, 

{0, 0, 0, 0}, colfen, 0, 0, 

0,0,0,0,0.0,0,0, 

OL, 0, OL, OL. OL. 

(30, 10, 1 50,1 55+1 60*mode}, -1 L, OL J; 

PammList maFerfi - { 

sizeof(ParamList), OxSOAO, "UODeuxieme-, OL, 
(0, 0, 0, 0}, colfen, 0, 0, 
0, 0, 0, 0, 0, 0, 0, 0, 
OL, 0, OL OL, OL, 
{60.166+160*mode.180,310+320*mode}, -1L, OL }; 



r la second© fenStre 7 



fiber ihe Recti - [30,20 , 1 00 , 125+1 60*mode} ; 
Red <heRec12 - (100,0,1 20,1 45+1 60'mode}; 



P rectangle oti on va dessiner 7 
r rectangle oCi on va ecrire */ 



char pat[4][16] - { /* pattern rouge/blanc (mode 640) 7 

{0x77,0x77,0x77,0x77.0x77,0x77,0x77,0x77. 
0x77,0x77,0x77,0x77,0x77,0x77,0x77.0x77), 

T pattern verVMartc (mode 640) 7 
{0xBB.OxBB.0xBB,0xBB,0xBB,0xBB.0xBB,OxBB. 
0xBB,OxBB,0xBB,0xBB,0xBB,0xBB,0xBB,OxBB). 

r pattern Manc/bleu (mode 640) 7 
[Ox DD ,0x DD ,0xD D.OxD D.Ox D D ,0x DD ,0x DO ,0xDD , 
0xDD,0xDD,0xDD,0xDD,OxDD,0xDO,0xDD,0xDD), 

r pattern blanc/jaune (mode 640) 7 
[0xEE,QxEE,OxEE,OxEE.OxEE,OxEE,OxEE,0xEE, 
OxEE,OxEE,OxEE,OxEE,OxEE.0xEE,0xEE,OxEEf 
}: 



int 


indie ~TRUE; 


TaskRec 


tache; 


Pointer 


wind, fen1, fen2; 


Handle 


barFenl, barFena 


Reel 


menu Reel; 


int 


forChl - iRect; 


int 


colCM • iRouge; 


int 


forCh2 - iOval; 


int 


colCh2 - iVert; 



T indicateur de fin de boucle 7 

r ce que manipule GetNaxtEvent 7 

r pointeurs sur fenetres 7 

I" handles sur barres de menus 7 

f rectangle conte riant chaque barre fendtre ' 

r article lorme coche fenetre 1 7 
T article couleur coche fenetre 1 '/ 
r article forme coche fenetre 2 7 
T article couleur coche (enelre 2 7 



PROGRAMME PRINCIPAL ' 



main( ) 



my ID; 

mylD - debut_appl(mod9); 
PlaceMenus( ); 
OuvreFen( ); 
HushEventsf Even/Event, 0); 



f kientifiant de 1'applicatton 7 

r initialisations standard 7 

I" installs la barre de menus systeme 7 

r ouverture des deux fenetres 7 

r menage dans la file d'evdnements 7 



do [ 



if(!GetN>xtEvent(£v»ry£i'ent, atache)) continue; 

switehflache . what) 



case MouseDown : r souris 7 

sojrbDans(FlndWlndow(4wind, tache where)); 
break; 



case KeyDown : 

if ( tache .modifiers & AppteKefl 
I 
MenuKey(&tache, OL); 



f clavier */ 

r louche Pomme enfoncee ' 



f appel menu systeme 7 
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indie - ExecMenu(taehe TaskData); 
) 
break: 

case UpdataEvt : f fenetre a mottre a jour 7 

Ajo ur( lache . message) ; 
break; 
} 
) 
while(indic) ; 

SetBarCelorsfOxOQFO ,0x000 F,0) ; /* on retablit tes couleurs par defaut */ 

quitter(mylD); r fin standard */ 



T — FONCTION SOUHISDANS: raponse a un die aouria •*—/ 
sourisDans(code) 
int code; /* code retourni par FindWindow 7 

{ 

long pt; /* un point, pour ne pas afterer le champ wfwre de I'^ifdnemenl */ 

switch (code) 

{ 

case wlnManuBar: 

M*miSalect(&tacne, 0L); /* appel menu systems */ 

indie - ExecMenu(tacheTasfcDafa); 

break; 

case wlnContent : 

if (wind I- FrontWlndow( )) SefecfWIndtowfwind); 

else 

{ r appel des differenls menus fenetre V 

pt - 1ache.iv/iere ; f lieu oil la souris a 616 enfoncee (coord, glo bales) 7 

SetPort(wind) ; /* indispensabte pour la conversion qui suit 7 

GlobalToLocal(Kpt), f passage en coordonnees locales 7 

if (PtlnRectf&pt, fimenuRect}) /* le point esl-tl situ* dans la barre fenetre? 7 

{ 

if (wind -■ tenl) Menu Select) 8 taehe, barFent): 
else if (wind — fens) Menu Selects ache, barFenZ); 
E i e cM e n u( tac he . TaskData) ; 
) 
) 
break; 

case wlnDrag : T defacement de fenetre habitual */ 

if (wind I- FrontWlndow( ) && l(tache.mod%rs& ApphKsfi) 

Sat ectWl n dow(wi nd) ; 
Drag Wind ow(0, tache. where, 0, 0L, wind): f defacement minimal par defaut */ 
break: 
) 
1 

/"'" FONCTtON OUVREFEN: ouvre 2 fen^tres avec barre de menus **"*/ 

OuvreFen( ) 

iM hMBar; /* hauteur des barres fenetre */ 

fen2 - NewWindow(SmaFen2); I" ouverture de la fenetre 2. . . */ 

barFen2 . NewM«nuBar(fen2); f . . .a laquelle on associe une barre de menus. . . V 
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SetMenuBar(barFen2); r . . sur laquelle on va travailler immediatement 7 

5«tTltleStart(16); /* on laisse 16 pixels k gauche do la barre 7 

lnsertMenu{NswMenu(Menu6), 0); r on inclut lo menu Couleur 7 

lnsertMenu(NewMenu(Menu5), 0); r on inclut le menu Forme, a sa gauche 7 

FixMenuBarf ); r on calcule la la I© de la barre 7 

CheckMI tern ( TRUE, iOval}; f on coche la forme par defaut 7 

ChockMltemjrflUE, iVert); F on coche la couleur par defaut 7 

f Note: on ne dessine pas la barre, c'est I'evenement de mise a jour qui sen charge! 7 

fen1 . NowWIndow(SmaFenl); r idem fenetre 1 7 

barFenl - MewMenuBar(fenl); 

Se t Men u 8 ar( ba r Fe n 1 J ; 

SetTltleStart(16); 

lnsertMenu(NewMenu(Menu6), 0); 

lnsertMemi(NewMonu(Menu5), 0): 

hMBax ■ FIxMenuBart, ); /* on memorise la hauteur de la barre 7 

OieckMltemtTflUE. iFtect): 

CheckMltem(THUE, iRouge); 

SetRect(& menu Reel, 0, 0, 1000, hMBar}; f le rectangle contenant la barre fenetre V 

r"" FONCTION PLACEMENUS: installe la barre de menus systeme I 

PlaceMenus< ) 



SetMenuBarfOL); I* on travaille sur la barre systeme 7 

SetTltleStart(50) ; f on commence a 50 pixels du bord 7 

ln*ertM»nu{NewHenu(Menu2), 0); f insertion du menu JP Curcio presents 7 

FixMenuBar( }; r calcul de la taille de la barre systeme V 

if (Imode) SelBarColorsfOxOOSD, 0x0097. 0x0020): 
DrawMenuBart ): r dessin immediat (en cou lours si mode 320 uniquement) 7 



/"*" FONCTION EXECMENU: repond au cboix d"un article de menu ' 



int ExecMenu(art, menu) f retoume FALSE si quitter est choisi 7 

int art; r article choisi 7 

int menu; t dans ce menu 7 

{ 

char msg[30]: 

SetPort(GetWMgrPort( )) ; f on ecrit da ns le Window Manager port. ..'/ 

sprintf(msg, "article %d - me nu %d ", art, menu) ; /* .. .le menu et ('article choisis ... 7 
MoveTof 1 0, 1 95) : DrawCStrl ng(rrrsg) : r . . .en bas a gauche de I'ecran 7 

switch(art) 

( f les valeurs parlent d'elles-memes! 7 

case (Quitter. 

return FALSE ; r I'applicatJon se termine bientot! 7 

break ; 

case iRect: f on va memorise? ta nouvelle forme... 7 

SatWRofCon((k)ng) (G«tWnefCon(wind) « OxFO) 1 0x01, wind); 
ForMarque(art); I" ...et faire les cochages necessaires 7 

break; 

case iOval: 

SetWRotCon((tong) (G»tWHafCon(wnd) & OxFO) | 0x02, wind); 

ForMarque(art); 

break; 
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case iRRect: 

SetWRefCon((long) (GetWRefCon(wind) & OxFO) | 0x03, wind); 

ForMarque(art); 

break: 

case iArc: 

SetWRefCon((long) (GetWRafCon(wind) & OxFO) | 0x04, wind); 
ForMarque(art); 

break: 

case i Rouge: I" on va memoriser la nouvalle couleur. . . 7 

Set WRef Con. ((long) (GetWRefCon(wind) 4 OxOF) | 0x1 0, wind); 
ColMarque(art); /* ...et (aire les cochages necessaires 7 

break; 

case iVert: 

SetWRefCon((bng> (GetWRefCort(wind) & OxOF) | 0x20. wind); 

ColMarque(art); 

break: 

case iBIeu: 

SetWRefCon((k>ng) (GetWR«fCon(wnd) S OxOF) | 0x30, wind); 

ColMarque(art); 

break; 

case iJaune: 

SetWRerfCon((long) (GetWRefCon(wind) & OxOF) | 0x40, wind): 

ColMarque(art); 

break; 
} 

if (art) r s'il y a reellement choix dun article */ 

{ 

SetPort(wind) ; /* on selection™ le grafport de la fenetre active 7 

lnvalReet(&theRect1): r on rend invalide le rectangle contenant le dessin 7 
lnvalRect(£theRect2); I* on rend invalide le rectangle contenant le texte 7 
HiliteMenu(0, menu); f on retablil le menu a son etat normal 7 

) 
return TRUE ; /" I'application continue! 7 



/***" FONCTIQN AJOUR: mise a jour dune fenStre ""7 
Ajour(port) 
Pointer port; /* pointeur sur la fenetre a mettre a jour 7 

{ 

int refcon; 

char msg[10]; 

refcon ■ (int) GetWRefCon(port); f recupere les caractenstiques du dessin a execute r */ 
SetPort(port); /* on va dessiner dans le gralport de la fenetre a rafraichir 7 

BeginUpdate(poit) ; /' debut de la mise a jour 7 

if (port == fent) SetMenuBar(barFen1); 
else if (port == fen2) SetMenuBar{barFen2); 

DrawMenuBar( ); Ton commence par redessiner la barre fenetre */ 

EraseRect(&theRectf ); I* on efface completement le rectangle du dessin 7 

EraseRect(&theRect2); r on efface completement le rectangle du texte 7 

switch (refcon & OxFO) 

{ 

case 0x10: T rouge 7 

if (mode) SetPenPat(pat[0]); /* on fixe un pattern en mode 640 7 
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else SetSolidP«lPat(7); f ou la couleur rouge en mode 320 V 

spri ntf [msg , V o ugel ; 

break; 

case 0x20: f vert 7 

if (mode) S«tPenPHt{pat[1]); 
else SetSolldPenPat(IO); 
sprintf(msg,"verf); 
break: 

case 0x30: f bleu 7 

if (mode) SetP»nPat(pat{2)); 
else Se!SolldPenPat(4) ; 
sprintl(msg,"bteu*); 
break; 

case 0x40: /* jaune 7 

if (mode) SetP»nPat(pat[3]); 
else SetSolJdPertPat(9); 
sprintfjmsg, "jaune"); 
break: 

MoveTo(100+160*mDde.1 18), DrowCStrlng(msg); r on ecrit ia couleur 7 

switch (refcon & OxOF) 

case 0x0 1 : f rectangle */ 

PatntRect(&theRect1 ) ; /* on le dessine avec la couleur (ixee plus haut */ 

SetSolidPenPat(D) S«tP«nSIZ«(2*(mode+1). 2); 

FramoRect(&theRect1 ); t et on souligne ses contours en noir 7 

spri ntf(msg," Rectangle") : 

break; 

case 0x02: f ellipse 7 

PalntOval( AtheRectl ); 

S«SolldPenPat(0); SetPenSize(2"(mode+1), 2): 
Fram*Ovai(StheRecti ); 
sprintf (msg , "Ovale") ; 
break; 

case 0x03: t rect. arr. 7 

PaintRRect(&the Recti . 40*(mocte+1), 30); 
SetSolldPenPat(O): SetPenSIIe(Z-{mode-. 1 ), 2); 
FrameRRactf StheRectl , 40*(mode+1), 30); 
sprintf (msg, "Rect. arr."): 
break; 

case 0x04: f arc V 

PalntArc(5theRect1 . 45. 290); 
SetSolidPenPat(O); SatPonSti«(2*(mode+1). 2); 
Fran»Are(StheRect1 , 45. 290): 
sprintf (msg, "Arc'}; 
break; 

} 
MoveTo( 10,118): DrawCStrfngfrrisg) ; r o n ecrit la forme V 

EndUpdato(port); /* Tin de la mise a jour */ 

} 



r"" FONCTION COLMARQUE: cochage des articles des menus Couleu 
ColMarque (article) 
inl article; 
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if (wind-- fenl) 

CheckMHemfF^lSE, coIChl); r on retire la marque de la couleur precedents */ 
CheckMltem(Tfl£J£ article) ; f on eoche la couleur choisie */ 
coIChl - article; T on memorise la nouvelle couleur */ 

) 
else if (wind — fen2) 

( 

ChwkMrWm(F4lS£, colChZ); /* idem V 

CheckMlt»m(7flU£, article); 

colCh2 - article; 

) 



/•**" FONCTIQN FORMAHQUE: cochage des articles des menus Forme *""/ 

ForMarque{arBcte) 

int article; 

{ 

if (wind — fenl) 

Ch»ckMlt»m( FALSE, forCh 1 ) : /* on retire la marque de la forme precedents V 
CheckMHMinrflt/E, article) ; r on coche la forme choisie */ 
lorChl - article; t on memorise la nouvelle forme V 

) 
else if (wind — ten2) 

CheckMrtem(FA£.SF, forCh2): r idem*/ 

CheckMltem(Tf?L/£, article): 
forChZ - article; 

) 



Exemple complet : menus et fenetres 

Dans cet exemple, nous aliens voir ['utilisation d'une barre de menus systeme en 
conjonction avec I' activity des fenetres (systeme et application). Le menu* contient 
les accessoires de bureau. Quatre autres menus son! presents : 

- le menu Fichier, tou jours actif. It permet d'ouvrir une nouvelle fenetre (jusqu'a 
neuf possibles), de fermer une fenetre ou un accessoire de bureau, et de quitter 
I' application ; 

- le menu Edition, actif uniquement si une fenfitre systeme est au premier plan 
(1' application ne gere pas le copier-coller pour ses propres fenetres, mais le permet 
entre accessoires de bureau) ; 

- le menu Fenetres, actif uniquement si une fenStre de ['application est active. 
Chaque fois qu'une fenetre est ouverte, son titre est ajoute" dans ce menu. Chaque fois 
qu'une fenetre est fermde, son titre est retire" de ce menu. De plus, s^lectionner un 
article dans ce menu entraine la mise au premier plan de la fenetre correspondante ; 

- le menu Speciaux, actif uniquement si une fenetre de I'application est active. Ce 
menu n'a aucune utility. II est la simplement pour illustrer quelques fonctions du 
Menu Manager ; la directive \X (couleurs de remplacement), les styles que peuvent 
prendre les articles (remarquer le souligni, inutilisable avec la police systeme, et 
l'italique, que la version 1.02 de QuickDraw ne sait pas gencrer), le cochage et le 
changement de libell6 pour un article. 
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Chaque fois que la bane des menus est sollirit£e, le numero de 1' article et le 
numero du menu selectionnes sont affiches en bas de Tehran. 

Le titre des fenetres est genSre automatiquement : un compteur incremente le 
nombre de fenetres ouvertes depuis le d^marrage de 1' application. Remarquer la 
double reservation d'espace memoire, pour les titres de fenetres et les libelled des 
articles correspondents . Les fenetres sont deealees les unes par rapport aux autres a 
leur creation. Elles affichent le contenu de la valeur d'utilisation libre, dont nous nous 
sommes servi comme lien avec le tableau de pointeurs sur fenetres. 

La barre de menus est bleue sur fond jaune en mode 320 (et retablie en fin 
d'application), elle restera noire sur fond blanc en mode 640, 

On notera la maniere dont sont reperees les feniltres : les elements d'un tableau de 
dimension 9 contiennent soit zero-long soit la valeur du pointeur reperant une feneire. 
L'indice de I'glement plus un est la valeur stockee dans le champ wRefCon de la 
fenetre pointee. Cette valeur est egalement 1'identifiant de l'article du menu Fenetres 
correspondant (a une translation pres). 
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Figure VI.S Meuf fenetres et un accessoire dt bureau ouvtiis. 



^include <tools.h> 
Sinclude <entete.h> 



r definition des termes en gras 'I 

r definition des termes en italhque *l 



#define mode 



r si mode 320, 1 si mode 640 V 



char Menu 1[ ] = 
char Menu11[ J ■ 
charMenu19[] - 
char Menu£( ] ■ 
charManu21[]. 
char Menu22[ ] . 
char Menu23[ ] i 
char Menu29[ ] . 
char Menu3[ ] > 
char Menu 31 [ ] ■ 
char Menu32[ j i 
char Menu33[ ] . 
char Menti34[ ] - 
char Menu35[ j . 
char Menu39[ ] ■ 



"»@\\XN1 "; 
■■-Aproposde..A\N261VD - ; 

"» Fichier \\N2"; 
■--OuvriA\N271*Oo"; 
-~Fermer\\N255D*Ff"; 
■-QuitterWJ273*Qq"; 

"» Edition \\N3D": 

•- Annulert\N250V* Zz" ; 

*--Couper\\N25rXJ£"; 

■■■Copier\\N2S2*Cc"; 

•-Coller\\N253*Vv': 

■~EffacerWJ2S4"; 



f menu Fichier */ 



r menu Edition */ 
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char Menu4[ ] = 
char Menu41[ ] - 
char Menu49[] - 
char Menu 5 1 ] = 
charMenu51[ ] = 
char Menu52[ ] - 
char Menu53[ ] = 
char Menu54[ ] = 
char Menu55[ ] ■ 
char Menu56[ ] - 
char Menu57[ ] = 
char Menu58[ ] = 
charMenu59[] - 



"» Fenetres AN4D"; 
■- WN29Q": 

'»Speciaux\\N5XD"; 

■-Normal\\N301"; 

"~Gras\\N302B-, 

"--ltalique\\N303P; 

■--Souligne\\N304U"; 

■--WN305D": 

"--Coche\\N306C\22'Mm"; 

'-Es!c.mpe\\N307D"; 

".-Non standard\\N308X"; 



F menu Fenetres */ 
T menu Speciaux V 



char cochoui[ ] = "*6 Coche'; 
char eochnon[ ] = "\12 Hon cocha" 



#deline mFichier 


2 


#define m Edition 


3 


#de(ine mFenetres 


4 


Adeline mSpeciaui 


; 5 


#define iOuvrir 


271 


#define i Farmer 


255 


#define iQuitter 


273 


#deline iAnnuler 


250 


#de(ina iCouper 


251 


Sdo'ine iCopior 


252 


#define ic oiler 


253 


((define i Efface r 


254 


#define iFen 


290 


#define iCocher 


306 


int colfenj ] - 


(Q.OxQF00.OxO2OF,OxF0F0 


ParamList maFen . 


•I 


sizeof(ParamList), OxCQSO, ", OL, 


(0, 0, 0, 0} 


. coif en, 0, 0, 


0, 0, 0, 0, 0, 0, 0, 0, 


0L,0,0L,l 


)L, OL, 


{30,20,70,1 80+ 320*mode), -1L, 0L }; 



f un blanc obligatoiro! */ 
r idem */ 



r definition de quelques conslantes 7 



r couleur des fenetres 7 



f la fenetre de base (invisible) V 



char titreF[9][14]; r 9 litres de 14 caracte res maxi (fenetres) 7 

char titreM[9][15); r 9 titres de 15 caracte res maxi (menus) 7 

Pointer fenl9) = {0L, 0L, 0L. 0L, 0L, 0L, 0L. OL, 0L}; f trace des differentes fenfitres */ 



TaskRac 
Pointer 



indie = TRUE, 

tache; 

wind; 



r indicateur de fin de boucle V 
r ce que manipule GetNextEvent ' 
f pointeur sur fenetre */ 



r — PROGRAMME PRINCIPAL ' 



mainQ 

{ 

int mylD; 
Pointer save Port; 
char msg[15|: 

mylD - debut_appl(mode); 

PlaceMenus( ); 

Flush Even tB(EveryEvent, 0); 



do ( 



SystemTask(): 



r identifiant de Implication 7 
f pointeur sur grafport 7 



/* initialisations standard 7 

T installe la barre de menus V 

T le menage dans la file d'evenements V 

C pour les accessoires de bureau periodiques 7 
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it(\GetUext£vent{Every Event, atache)) continue; r pas d'evene merit notable */ 

switch(tacha.n'fiaf) r quel evenement? 'I 

{ 

case MousaDown : P bouton souris enfonce */ 

souris Dans{Fi n d W i n d ow (Swin d, tache . where) ) ; 

break; 

case KayDown : P clavier */ 

if (tache.modi/rews & AppleKey) P touche Pomme enfoncee 7 

M en u Key ( &tache, OL) : P q ue I article . q uel menu? 7 

indie . ExecMenu(tache. rasfcOata); P reponse a la commando V 

) 
break; 

case Update Evt : P mise a jour 7 

savePort ■ GetPort( ); 

SetPort(tache message) ; P on va ecrire dans te bon grafport */ 

Beg tnUpdate(tache. message) ; 

sprintf(msg,"FfefCon - %d",(in() Get WRefCon(taehe. message)), 
MoveTo(10,20); DnwrCString(msg); 
End Upd ate( tache, message) ; 

SetPort(savePort); P on retablit le grafport precedent */ 

break: 

case AcbvateEvt : P activation ou deactivation 7 

activer(tac he . message) ; 

break; 
) 
) 
while! indie) ; 

SetBarColorsfOxOOFQ.OxOOQF.O); P couleurs standard pour les menus '/ 

quitter(mylD): r fin sta ndard 7 



/•"" FONCTION SOURISDANS: reponse a un ciic souris "**7 
sourisDans(code) 
int code; P code retoume par FlndWIndow 7 

if (code<0) P dans un accessoire de bureau 7 

System CIJek{& tache, wind, code); P manipule par le Desk Manager 7 

if ((code & OxFF) -. wlnGoAway) EtatMenu( ); P on change la barre des menus 7 

} 
else switch (code) 

case wtnMnnuBar : P dans la barre des menus 7 

MenuSeleet(&tache, OL); P quel article, quel menu? "I 

indie = ExecMenu(tache. TaskData); P reponse a la commando 7 
break: 

case wlnContent : P dans le contenu d'une fenetre 7 

if (wind !> FrontWlrvdow( )) SelectW1nd«w(wind); 
break: 

case wlnDrag : P dans la barre de Mire 7 

if (wind I- FrontWlndow( ) && l(tache.moolrfie/5 S AppleKsy)) 

SelectWindow(wind) : P ma n ipula tjons standard ! 7 

DragWindowfO, tache where, 0, OL, wind); 
break; 
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case wlnGoAway: 
ferrner(wind); 
break: 



r dans la case de fermeture */ 
P on lerme! 7 



/***" FONCTION PLACEMENUS; installs la barre des menus * 



PJaceMenus( ) 



r le menu Speciaux 7 
r a sa gauche, le menu Fenetres 7 
T a sa gauche, le menu Edition V 
r a sa gauche, le menu Fichier */ 
T a sa gauche, le menu * 7 
T le nom des accessoires dans le menu t "I 
r calcul des dimensions de la barre des menus */ 

if (irnode) SetBarColors(0x009D, 0x0097, 0x0020); P en couleurs si mode 320 7 

Deleteltem{i Fen) ; quandcelamarchera! 

CalcMenuSI»(0, 0, mFenetres); 7 

DrawMenuBarf ); f on dessine la barre des menus 7 



lnsertMenu(NewMenu(Menu5), 0) 
lnsertMenu(NswMenu(Menu4), 0) 
lnsertMenu(NewMenu(Menu3). 0) 

1nsertMenu{NewMenu(Menu2). 0) 
lnsertMenu(NewMenu(Menu1), 0) 
FixAppleMenu(l); 
Fix Menu Barf ) 



("*" FONCTION EXECMENU: rSpond au choix dun article de menu ' 
int ExecMenu(art, menu) /* retoume FALSE si quitter est choisi 'I 



int art; 
int menu; 



T article choisi */ 
r dans ce menu 7 



int flag.TRLC; 
char msg[30J; 

r le port par d6faut est le Window Manager port 7 

spri ntffmsg , "article %d du me nu %d ", art, menu) : 

Mov»To(20,195); DrawCStringtmsg): t on ecrit en bas de I'ecran 7 



if (arb-249) 
switch (art) 

I 

case iOuvrir: 

ouvrir( ); 
break; 

case iFermer: 

fermer(FrontWlndow( }); 
break; 

case iQuitter: 
(lag- FALSE; 
break; 

case i Annular; 

System Ed It(Owb): 
break; 

case iCouper: 

SystemEdit(Cur): 
break; 

case iCopier: 

SystemEdit{ Copy); 
break; 



T article ere* par fapplication 7 

r ouverture dune fenetre de I'application 7 

T fermeture de la fenetre active 7 

f on quitters I'application 7 

f ger<S par le Desk Manager 7 

r g6re par le Desk Manager 7 

r gere par le Desk Manager 7 
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case iColler: 

SystemEdlt( Paste); 
break; 

case iEtfacer: 

System Ed it( Wear); 
break; 



/* gere par le Desk Manager 7 
r gere par le Desk Manager */ 



case iFen+1 : 
case iFen+2: 
case iFen+3 
case iFern-4: 
case iFen+5: 
case iFen+6: 
case iFen+7: 
case iFen+S: 
case iFen+9". 

SelectWI nd o w(len[art-i Fen-t D ; 

break: 

case iCocher: 

if[Getlt«mMart((iCocher)) 



r activation de la fenfilre choisie 7 



r I 'article est-il cache? 7 

r oui . . . 7 



CheckMltem(F/tLS£, iCocher); r ...on retire la marque... 7 
Sedtemfcochnon, iCocher); t ...et on change le libetle 7 



else 



CheekMlt«m( TRUE, iCocher); 
Se tttem (cochou i , i Cocher) ; 



r non... 7 
..on met la marque... 7 

r ..M on change le libel le 7 



Cal c MenuSI»{0 . 0, mSpeciaux) : r recalc u I du menu touche 7 

break; 



else if (art>0) 

I 

OpenNDA(art); 

E nab Ml tern (i Fermer ) : 

EtatMenu(); 

) 

if (art) HiliteMenu{0, menu); 

return flag; 



f ouverture accessoire de bureau "I 
T article Fermer autorise 7 



r on retablit I'etat normal du menu 7 



/***** FONCTION OUVRIR: ouverture o"une nouvelle fenStre 



ouvrir{ ) 



static compteur; 
int 1; 

Beet r; 



f s'incremente a chaque ouverture de fenfitre 7 
f un rectangle */ 



lor (i-0; k9; ++i) 
1 
if (fenlj] -- OL) 

i 

fen[i] - MewWlndow(&maFen); 



sprintf(titreF[i],"Feft*tre n"%d",++compteur); 



r nouvelle fenetre (invisible)... 7 
. dont on change le titre */ 



ctopStr(titreFIi]); 
SetWntle(titreF|i], fen[i]); 



r conversion C -> Pascal 7 



} 



MENU MANAGER I 197 



r ... dont on change la localisation */ 
MoveWlndow(20+20*(mode+1)*i, 30+12'i, fen[i]); 

/* . . .dont on change le champ wRslCon 7 
SetWRefCon((long) i+1 . fen[i]}; 

f on fait apparaTtre la fenetre 7 
SelectWI n d ow ( fe n [ i ] ) ; 
ShowWindow(fen[i]) ; 

f ma nip sur le menu Fenetres 7 
ln»ertl»m(Menu41, -1, mFenetres): 
Setll»mlD(iFen+i+1 , iFen); 

sprintl(titreM[i]," Fenetre n°%d",compteur); P un blancde difference! */ 
ctopstr(titreM [i]) : /* conversion C -> Pascal 7 

Setltem(titreM[i]. iFen+i+1); r on change le libel le de 1'article */ 

CatcM»nuS!ze(0. 0, mFenetres); I* recalcul de la taille du menu Fenetres 7 
EnableMltem(iFemter); f article Farmer autorise 7 

break; 
1 
} 

for (i-0; i<9; ++i) if (fenfl] -- OL) return; f si 9 fenetres sont ouvertes... 7 

DisableMltem(iOuvrir); f ...Particle Ouvrir est estompe 7 

I" ces deux demieres lignes pourrant 4tre evilees quand CounlMltems remplira son role. . 
On ecnra: 

if (CountM Items) mFenetres) -- 1) DlaabieMltemliOuvriri; 
L'egalite a 1 se transformant en egalite a si les menus vides d'articles sont toleres */ 



/**"* FONCTION FERMER: lermeture d'une fenetre ""V 
fermer(port) 
Pointer port; P pointeur sur la fenetre a fermer V 

{ 

int ind ; 

if (port -- OL) return; f aucune fenetre 7 

else if (GetWKInd(port)) CloseNDAbyWinPtr(port) ; f accessoire de bureau 7 

else 

{ r fenetre de I 'application. 7 

ind - (int) GetWRefCon(port): P laquelle? 7 

fen[ind-1 ] - OL; F on annule son pointeur 7 

CloseWindowfport); Ton ferme la fenetre */ 

EnableMltem(iOuvrir); /' article Ouvrir autorise 7 

Deleteltem(iFen + ind): F article correspondant a la fenfitre supprime V 

CalcMenuSlze(0, 0, mFenetres); f recalcul de la taille du menu Fenetres 7 
) 

if (FrontWirdowf j =- OL) 

DlsableMltem(iFermer); /* s'il ny a plus rien a termer, on estompe! 7 

EtatMenu( ); F on change la barre des menus 7 

\ 



F"" FONCTION ACTIVER: activation ou deactivation d'une fenetre ' 

actfver(port) 

Pointer port; P pointeur sur la lenelre 4 active r ou c&sactiver 7 

«■" seules les fenetres de I'application sont touchees 7 

I 

int ind; 

ind = (int) GetWRefCon(port); 

if (tache.morf/iere & ActivsFlag) P si activation. . . 7 
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CheckMltenHTfll/F. iFen + ind); r ...lenfitre cochee */ 

else r si desactivation... */ 

CheckMltem(FALSE, iFen + ind); f . . .fenetre non cochee 'I 

EtatMenu( ); /* on change la barre des menus 7 

} 

/*•*** FONCTION ETATMENU: transforme la barre des menus 

en foncfon de la fen§tre active / 

EtatMenu( ) 

static etatprec; I* le type de la fenelre active precedents 7 

int etatact; r* le type de la fenStre active actuelle */ 

etatact - (FrontWlndow( ) — OL) ? : (GetWKInd(FKmtWindow( )) ? -1 : 1); 

if (etatact =- etatprec) return; /* on ne fait rien si le type n'a pas chang* 7 

r sinon... */ 
if (etatact > 0) f si la fenetre active appartent a I'application •/ 

SetMenuFtagfD/saWeAfenu, m Edition); f menu Edition ddsactivS */ 
SetMenuFlagjf nablsMsnu, mFenetres); /* menu Fenfitres active */ 

SetMenuFlBg(&iabteAtenLr, mSpeciaux); ^ "*>"" Speciaux active 7 

else if (etatact < 0) f si la fenStre active est un accessoire de bureau 7 

SetMenuFlagfEnaMeAtenu, mEdition): f menu Edition active 7 
SetMenuFlagfCfeaWeMenu, mFenetres); f menu Fenfitres dSsaclive */ 

SetMenuFlagtDisaWeMenu, mSpeciaux); f menu Speciaux dSsactive 7 

e | 3e T s'il n'y a plus de fenetre ouverte 7 

SetMenu Flag (DisaWeMenu. mEdition); /* menu Edition active 7 
SetMenuF1ag(DJsa6teMenu, mFenetres); /* menu FenStres desactive 7 

SetMenuFlag{DfsabteMenu. mSpeciaux); P menu Sp6ciaux desactiv6 7 

} 

etatprec - etatact; f on memorise I'Stat actuel... */ 

DrawlvtenuBar( ); f . . .et on redessine la barre des menus 7 



CHAPITRE VII 



CONTROL MANAGER 



PRINCIPESGENERAUX 



Les contrdles sont omni-pr£sents dans les applications respectant ['interface 
utilisateur Apple, mais le plus souvent, c'est un gestionnaire particulier qui les gere 
plut6t que 1'application elle-meme. Qu'est-ce qu'un controle ? C'est un objet qui 
apparait k l'ecran avec lequel I 'utilisateur, grace i la souris, peut soit provoquer une 
action instantanee, soit changer des parametres pour modifier une action future. 



D A cocher 

^ D6ja coch*e 

^ Option 1 
O Option 2 


o] 






1 


H 


Boutonl 




Bouton2 




Bouton3 




Boutonl 











Figure VI], I. Les CDRtr&les SUndird. 



Le Control Manager cere les controles : il en permet I'affichage ou le masquage, 
s'occupe de l'aspect visuel des actions de 1'utilisateur, garde en memoire la valeur 
qu'ils prennent... 
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Boutonl 



Boutonl 

Bouton2 



LUiuftfinX 



Figure VIL2. Les different! aspects des boutons simples des dtui types (mralll, tn lumi*re. estomp*). 

II existe deux grandes categories de contrdles : ceux qui peuvent prendre au plus 
deux vaieurs (categorie des boutons) et ceux qui peuvent prendre un nombre fini 
(supgrieur a deux) de vaieurs (categorie des cadrans). 

Dans la premiere categorie, trois types de controles sont pred£finis ; 

- le bouton simple (ou case) peut avoir deux aspects : rectangle normal ou 
rectangle a bords arrondis, contenant un litre (centre), Le fait de cliquer dans un 
bouton cause la mise en lumiere de 1'inteneur du bouton, et si le bouton de la souris 
est relache a I'interieur, une action immediate ou continue doit s'ensuivre. Optionnel- 
lement, un trait fort peut entourer le bouton arrondi ou une ombre accompagner le 
bouton no n arrondi, signiftant que 1'appui sur la touche Retour ou Entree equivaut a 
un clic souris dans ce bouton (bouton par d£faut) ; 



O n cocher 


S D& ja cochee 


O R cocher 


O Dejo cochee 


L.J ft ooch«i' 


['::'■; D« Jii «««h/>ff 



Flfure Vn.3. Les dirferents aspects des cases i cocher (normal, en lumiere, estompt), 

- la case a cocher est un petit carre avec un titre a sa droite. Le fait de cliquer (et 
surtout de relacher le bouton) dans une telle case fait alternativement apparaitre ou 
disparaitre une croix, precisant une option s£lectionnee ou pas. Typiquement, une 
telle action est rarement suivie d'un effet immediat, mais permet la modification d'une 
action future ; 



<3> Option 1 


O Option 2 


& Option 1 


O Option 2 


'#' Dj>fcittO '! 


C„" Oj>* £»n 2 



Figure VII .4. Les diEKretlls aspects des boutons radio I norma), en lumiere, estompel. 
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- le bouton radio est un petit cercle avec un titre a sa droite. II n'est jamais seul 
mais fait partie d'une famille de boutons radio. Le fait de cliquer dans I'un des boutons 
fait apparaitre a Tinterieur du cercle un gros point, et dtsparaitre le point du precedent 
bouton selectionne. En effet, dans une famille de boutons radio, seule une option peut 
etre seiectionnee a la fois : les options sont exclusive^. Comme pour la case cochee, la 
famille de boutons radio permettra d'agir sur une action future, plutot que de 
declencher une action immediate. 

Pour chacun des trois types, le controle peut etre momentanement desactive, a 
Tinstar des articles des menus deroulants, Le titre d'un controle inactif est estompe, et 
aucune action de la souris ne peut etre suivie d'effet dans un tel bouton de controle. 

Un seul type de controle est predefini dans la categoric des cadrans : la barre de 
defilement. One barre de defilement est un objet complete, compost de plusieurs 
parties : fleches de defilement, bande de defilement, curseur de defilement. Le 
curseur se deplace dans la bande, delimitant avec les fleches deux regions (parfois 
vides) de defilement de page. Chacune des parties de la barre de defilement r^agit a sa 
maniere. 

Une barre de defilement est gene>alement associee a une fenetre, mais peut servir 
a representer n 'import e quelle quantity finie : la longueur de la bande de defilement 
represente la quantity totale, la taille du curseur represente la quantite visible ou 
affichee (en proportion de la taille totale), la position du curseur represente la position 
de la partie visible ou affichee vis-a-vis de Tensemble. 




Figure VII. 5, Les dtrfereitts aspects des barres de derUemenl (norma), se"kctionne de trois muleres, inactir de 
deux manieresl. 



Pour Taction de defilement, il faut definir une unite (par exemple une ligne pour 
une fenetre contenant du texte, ou la valeur 1 pour une barre representant un etat 
variant de a 15). Quand I'utilisateur cliquera dans une fleche de defilement, il 
deplacera son document d'une unite (defilement d'une ligne pour la fenetre de texte, 
incrementation ou decrementation de 1 pour 1'etat de a 15). La position du curseur 
sera modifiee en consequence. 

Attention Si I'utilisateur garde la souris enfoncee dans la fleche , faction de defilement 
doit se poursuivre periodiquement, jusqu'a ce qu'il relache le bouton de la souris, 

Quand I'utilisateur cliquera dans la bande de defilement entre le curseur et I'une 
des fleches, ii deplacera son document en une seule fois d'un nombre determine 
d'unites (par exemple defilement d'une page pour la fenetre de texte, incrementation 
ou decrementation de 4 pour I'etat de i 15), La aussi, la position du curseur sera 
modifiee en consequence. La encore, si I'utilisateur garde la souris enfoncee dans la 
bande. Taction de defilement doit se poursuivre periodiquement, jusqu'a ce qu'il 
relSche le bouton de la souris. Les deux regions comprises entre le curseur (Thumb) et 
les fleches (quand elles existent) sont appeiees PageUp et PageDown. 
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Enfin, 1'utilisateur a la possibility de faire glisser le curseur jusqu'a la position qu'il 
desire. Des qu'il aura rel3cri£ le curseur dans une nouvelle position, le document 
devra etre d^plac^ proportionnellement au displacement du curseur. 



UpArrow 



PageUp 



PageDown — * 

i ps 

* Down Arrow 



Figure VII .4. Les duTgrttltcs parties des harres de defilement. 

Si vous souhaitez d^finir vos propres controles, aucun probleme : le Control 
Manager vous le permet ! Mais nous n'entrerons pas dans ce genre de considerations. 
Reportez-vous a la documentation technique pour d^finir des controles autres que les 
boutons et la barre de defilement. 



UTILISATION DU CONTROL MANAGER 



Controles et f enetres 

Nous avons vu dans le chapitre consacre au Window Manager qu'une fenetre est 
creee avec un certain nombre de contr61es standard, d£fmissant 1'aspect de sa region 
contour. Nous avons dit que ces controles sont entierement geres par le Window 
Manager, qui utilise un grafport particulier, le Window Manager port, pour les 
dessiner. 

On ne confondra pas les controles ge>es par le Window Manager et les controles 
cr£6s et ger£s directement par l'application. 

Chaque controle cr££ par l'application appartient k une fenetre. Quand un contrdle 
doit etre affiche\ il apparait dans la region contenu de la fenStre. Quand il est 
manipuM par Taction de la souris, il agjt dans cette fenetre. En consequence, toutes les 
coordonnees concernant un contrOle seront d^finies dans le systeme de coordonnees 
locales de la fenetre. 

Les controles peuvent etre definis dans la zone d' informations d'une fenetre, mais 
l'op^ration pr^sentant la m<Sme complexity que la definition des menus deroulants, 
nous n'en parlerons pas da vantage. 

Comment la fenetre garde-t-elle trace de tous ses contrdles ? C'est tr£s simple : 
elle ne garde en fait trace que du premier contr61e qui lui est d^fini, par l'interm£diaire 
d'un handle, et chaque contrfile garde trace du controle qui le suit par l"interm£diaire 
egalement d'un handle. Deux listes sont associees k chaque fenStre : la liste des 
contrdles geris par le Window Manager, et la liste des contrdles ger6s par 
l'application. De la sorte, les contr61es torment deux chaines dans lesquelles Window 
Manager et Control Manager savent se retrouver. 
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Remarque Avec quelques manipulations pas tr&s orthodoxes, on peut ^changer les 
deux listes, ce qui permet a I'application de manipuler les contr61es crees par le 
Window Manager. Nous ne donnerons pas cet exemple : plutflt que de jouer a 
1'apprenti sorcier, il vaut mieux laisser TaskMaster faire defiler les fenetres, ou alors 
creer soi-meme les banes de defilement et programmer l'Apple I1GS comme un 
Macintosh. 



Caracteristiques de cont roles 

Tout controle possede une structure de stockage interne qui possede les elements 
suivants (description non exhaustive) : 

• un handle sur le contr61e suivant, pour assurer les chainages (le Control Manager 
se d£brouille). 

• un pointeur sur la fenetre a laquelle il appartient, 

• un rectangle dans lequel il sera dessine : pour un bouton, ce rectangle englobera 
la case de contr61e et le litre. Quand on demandera de rendre un controle invisible, 
c'est ce rectangle qui sera efface. Le rectangle precise a la fois la taiile et la localisation 
du controle dans la fenetre, il sera toujours exprime dans son systeme de coordonnees 
locales. 

• un entier precisant quelques caracteristiques internes : si le eontrdle est visible ou 
invisible, s'il est actif ou inactif. D'autres caracteristiques dependent du type Ju 
controle : bouton par ddfaut ou pas en cas des boutons simples, famille d'apparte- 
nance pour les boutons radio, composantes et orientation des barres de defilement... 

• la valeur courante associee au controle : toujours pour un bouton, 1 ou pour 
une case cochee ou non, un bouton radio selectionne ou pas, variable pour une barre 
de defilement, entre deux bornes. 

• les donn£es propres au eontrdle : un pointeur sur le titre pour un bouton, le 
montant total de donndes et le montant qui peut etre vu pour une barre {par exemple 
500 et 20 si un document texte fait 500 lignes mais que la fenetre ne peut en montrer 
que 20 a la fois). 

• l'adresse d'une procedure d'action & suivre quand 1'utilisateur invoquera le 
controle. 

• l'adresse d'une procedure de definition du controle (predefinie pour les contrdles 
standard, a fournir pour les controles detlnis par I'application). 

• un entier long que I'application pourra utiliser comme bon lui semble. 

• un pointeur sur la table de couleurs qui servira a representer les controles. 



EXEMPLES D'UTILISATION 
Initialisation, creation de controles 

CtlStartUp(mylD, zeropg); /* initialisation du Control Manager 7 



La procedure CtlStartUp doit etre appeiee avant toute utilisation du Control 
Manager, et apres initialisation du Window Manager. Comme d'habitude, le premier 
argument est I'identifiant de i'application tel qu'il a ete retoume par la fonction 
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MMStartUp du Memory Manager. Le second argument designe la page zero qui 
servira en usage interne au Control Manager. Voir ie chapitre XII pour la sequence 
exacte d'initialisation des outits. 

Pour creer un contrdle que ['application va pouvoir manipuler comme bon lui 
semble, il faut deja avoir cree une fenetre, puisque tout contrdle appartient a une 
fenetre. On utilise alors la fonction NewControl, qui ajoute ce nouveau contrdle a la 
liste des contrdles de la fenetre. Celle-ci ne reclame pas moins de dix arguments, et 
retourne un handle qui identifiera le controle pour son utilisation ulterieure (ou la 
valeur zero-long en cas d'erreur a la creation), Voyons le detail des dix arguments, en 
fonction du type de controle a creer : 

- premier argument : un pointeur sur la fenetre a laquelle appartiendra le 
controle, tel qu'il a etc" retournj par New Window ; 

- deuxieme argument : un pointeur sur le rectangle qui englobera completement 
le controle et le localisera a 1'interieur de la fenetre. Les coordonne'es du rectangle 
doivent etre exprimees en coordonnees locales de la fenetre d'appartenance. Pour un 
simple bouton, ce rectangle delink la taille exacte du bouton (et devrait avoir une 
hauteur d'au moins 20 pixels). Pour les autres types de boutons, une hauteur de 
16 pixels suffit. Pour une barre de defilement, il faut pre'voir au minimum 48 pixels 
dans le sens de la longueur pour que les fleches et le curseur de defilement puissent 
etre dessin^s, et une largeur d'au moins 12 pixels. Si on donne une largeur de trente 
pixels, la barre fera trente pixels et paraitra e'norme ; 

- troisieme argument : un pointeur sur le titre du contrdle. Une barre de 
defilement n'ayant pas de titre, on passera simplement un pointeur sur une chaine de 
caracteres vide. Comme d'habitude, le titre est une chaine de caracteres de type 
Pascal ; 

- quatrieme argument : rentier de'crivant les caracteristiques du contrdle. Seuls 
quelques bits sont definis dans cet entier, en fonction du type de controle (laisser a 
ze"ro les bits non cites). 

Remarque Si les bits 8 a 15 prennent la valeur $FF, le contrdle sera inactif. 

• simple bouton. Le bit est a 1 si le bouton doit etre ombre ou entoure d'un trait 
gras, signifiant qu'il s'agit du bouton par dcfaut. Le bit 1 donne la forme du bouton : 
pour un bouton arrondi, 1 pour un rectangle normal. Le bit 7 est a 1 si le bouton est 
invisible. 

• case a cocher. Le bit 7 est a 1 si la case est invisible. 

• bouton radio. Les bits a 6 donnent le num6ro de la famille a laquelle appartient 
le bouton. Le bit 7 est a 1 si le bouton est invisible. 

• barre de defilement. Le bit indique la presence ou non d'une fl&che de 
defilement vers le haut, le bit 1 d'une fleche vers le bas, le bit 2 d'une Heche vers la 
gauche, le bit 3 d'une fleche vers la droite, Le bit 4 est a zero si la barre est verticale, a 
un si la barre est horizontal. Le bit 7 est a 1 si la barre est invisible. 

- cinquieme argument : la valeur prise par le contrdle a sa creation (entier sur 
16 bits). Toujours pour un simple bouton, TRUE ou FALSE pour les autres 
categories de boutons (mais nous utiliserons plutot 1 ou 0), quelconque pour une barre 
de defilement (mais dans un intervalle coherent avec les arguments suivants) ; 

- sixieme argument : taille de la partie visualisee, encore appeiee, mais impropre- 
ment, taille minimale (cas d'une barre de defilement) ; 

- septieme argument : taille de l'ensemble des donnees, encore appeiee, mais 
improprement, taille maximale (cas d'une barre de defilement) ; 

- huitieme argument : adresse de la procedure de definition (dans le cas des types 
de contrdles non standard) ou valeur predefinie pour les contrdles standard : 
SimpteProc pour les simples boutons, CheckProc pour les cases a cocher, RadioProc 
pour les bouton radios et ScrotiProc pour les barres de defilement ; 

#define SimpteProc OL 

#deffne CheckProc 0x02000000 

#deSne RadioProc 0x04000000 

#de(ine ScrollProc 0x06000000 
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- neuvieme argument : entier long d 'utilisation Libre, dans lequel 1'applieation qui 
cree un contr61e peut stocker n'importe quelle valeur ; 

- dixieme argument : pointeur sur une table de couleur ddfinsssant quelles 
couleurs seront employees pour dessiner les controles (zero-long designe la table par 
defaut). La taille et le contenu de la table sont difterents pour chaque type de 
controle. Chaque couleur est definie sur un entier de 16 bits. 

Note La documentation est pratiquement inexistante sur le sujet, les renseigne- 
ments ci-apres sont sans doute incomplets ; 

• simple bouton. 7 couleurs sont definies : couleur du bord (bits 4 a 7), couleur de 
l'interieur a I'dtat normal (bits 4 a 7), couleur de l'interieur si selectionne (bits 4 a 7), 
couleur du titre si normal (bits a 3 : ForeColor, bits 4 a 7 : BackColor), couleur du 
litre si selectionne (bits a 3 : ForeColor, bits 4 a 7 ; BackColor), couleur speciale de 
mise en lumiere (???), couleur du double trait pour le bouton par defaut (???) 

• case a cocher. 4 couleurs sont definies : la premiere n'est pas utilised, couleur de 
la case a I'etat normal (bits a 3 : les traits de la case, bits 4 a 7 : l'interieur de la case), 
couleur de la case « en lumiere » (bits a 3 ; les traits de la case, bits 4 a 7 : l'interieur 
de la case), couleur du titre (bits 13; ForeColor, bits 4 a 7 : BackColor) 

• bouton radio. Idem case a cocher. 

• barre de defilement. 8 couleurs sont definies : couleur du bord (bits 4 a 7), 
couleur des Heches a I'etat normal (bits a 3 : le contour de la fleche, bits 4 a 7 t le 
reste de la boite, mais il v a d'autres subtilites). couleur des fleches « en lumiere » (bits 
a 3 : toute la fleche, bits 4 a 7 : tout ce qu'il y a autour), couleur dans le rectangle 
englobant la fleche (???), couleur du curseur a I'etat normal (bits 4 a 7 : interieur du 
curseur). couleur du curseur si selectionne (???), couleur de la bande de defilement 
(bit 8 : s'il est nul, la bande est de couleur pleine, definie dans les bits 4 a 7 : s'il n'est 
pas nul, la bande est constitute de points de la couleur definie dans les bits 4 a 7 sur 
fond de couleur definie dans les bits 13), couleur de la barre si inactive. 

Nous verrons des exemples de controles en couleur dans l'exemple complet en fin 
du chapitre IX consacre au Dialog Manager. 

Remarque 

- la fonction NewControl ne dessine pas le controle mais genere un evgnement de 
mise a jour, il sera done judicieux d'inclure un appel a la procedure DrawControls 
(voir plus loin) en reponse a ces evenements ! 

- aucun argument dans NewControl ne permettant de definir 1'eventuel pointeur 
sur la procedure d'action (cas des barres de defilement), il faudra appeler explicite- 
ment SetCtlAction (voir plus loin) pour fixer cette valeur. 

A titre d'illustration, les lignes suivantes creent un controle visible et actif de 
chaque type, en noir et blanc (on suppose que la fenetre d'accueil existe) : 

Hands bouton, check, radio 1 . radio2, barre R barre V; /* handles sur controles */ 
Pointer wind; ? pointeur sur fertetre */ 

flocf r f un rectangle */ 

SetReetf&r, 10,1 0,1 10.30); 

bouton - NewControl(wind.&r, , \6BoiJlon , ',3,0 l 0,0,Si;rnpfePrDc.0L,0L); 

SetRect(Sr,1 0.40,1 10,56); 

check - NewControltwind.&r.-MOA cocher- ,0,0,0,0,Criec*Proc,0L.0L); 

SetRect(&r,10,70,1 10,86): 

radiol -NewControl(wind,4r,"\10Option 1", 10,0, 0,0, RadhProcflLflL); 

S«tR»ct(& r , 1 ,90 . 1 1 0, 1 06) ; 

radioZ - NewControl(wind,&r,'\10Option2".10,1.0 l 0,Ra£*oProc.0L,0L): 

S»tReCl(S,r,1 0,1 20, 1 30, 1 36); 

barreH - NewControl(wind,Sr,~ l 0x1 C,5,1 ,20,Scro//Proc,0L,0L); 

SetRect(&r.140.10,1S6,130); 

barreV = NewControHwind.&r, ",0x03.25 ,20,200, Scro«Proc,OL,0L); 

DrswControl s(wind) ; 
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Dans la suite, un contrfile sera toujours repere par le handle retourne par la 
fonction NewControl. S'il arrive un moment ou 1'application n'a plus besoin d'un 
controle, elle pourra liberer la place qu'il occupe en m6 moire grace a Disposed: on tro I. 
En outre, cette procedure efface de F£cran et retire de la liste des controles de la 
tenet re le controle dont le handle est pass£ en argument. 

Hands barreH, barraV; 

DisposeControl{barreH): f plus de barro horizontals */ 

DfsposeCantrolfharreV); /* plus de barro verticale 7 

Encore plus draconienne, la procedure KillControls detruit tous les controles 
associes a la fenetre dont le pointeur est passe en argument. La encore, seuls sont 
d&ruits les controles cre'Ss par 1'application, et non ceux qui ont et£ cr££s pour la 
fenetre par le Window Manager. Notons que cette procedure est automatiquement 
appelee par CloseWindow, quand 1'application demande la fermeture de la fenetre. 



En reponse au Window Manager 

• Apres un evenement de type MouseDown. 

On se souvient de la boucle d'evgnements : quand I'utilisateur a enfoncg le bouton 
de la souris, il a provoqu6 un evenement de type MouseDown. Grace k FindWindow, 
cet evenement a pu £tre localise. Supposons qu'il se soil produit dans le contenu d'une 
fenetre qui contient des controles geres directement par F application, c'est au tour du 
Control Manager d'agjr : 

void Defilement }; (* declaration de la procedure d'action 7 

Hands ctl : /* handle designant un controle */ 

Pointer theWindow; /* poimeur sur une fenetre */ 

int partf, part2; /* partie du contrSle concemee 7 

r apres I'appel a FindWindow 7 

case win Content : f MouseDown dans la region contenu d'une fenetre 7 

if (theWindow 1= FrontWInctowf, )) f cette fenStre est- elle active? 7 

Select Wlndow(lhe Window); f non, abrs on I'aclive eton ne fait rien de plus */ 
else 

partf - FlndContro!(&cti, tacbe.ivnwe. theWindow); /* die dans un contrdle? 7 
if (Ipartl) 

r non, 1'application r^pond comma elle obit repondre */ 
else r ouil '/ 

{ 

par 12 a TrackContro!(tache.;vriere, Defilement, ctl): r manipulation du controle */ 
if (part2==part1 ) r si le die est valide. . . 7 

switch(partf ) 
{ 

case SimpleButton : f est-ce dans un bouton simple? 7 

f oui, identification et reponse appropriee 7 
break: 

case CheckBox : /• ast-ce dans une case a cocher? 7 

r oii, identification et r6ponse appropriee */ 
break: 

case RadhButton : /* est-ce darts un bouton radio? 7 

r oui, identification de sa f ami lie et reponse appropriee 7 
break; 
) 
\ 
break: 
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Aprts que Ton ait verify que le die a eu lieu dans la fenetre active, la fonction 
FindControl est appelee. Quatre arguments : le premier donne 1'adresse mimoire oil 
la fonction va stoeker le handle designant le eontrole dans leque! l'utilisateur a clique. 
Les deuxieme et troisieme arguments sont Tabscisse et Tordonnee du point ou a eu 
lieu le clic, en coordonnees globales, tel qu'il a £te enregistre dans I'evenement de type 
MouseDown (et comme d'habitude, ces deux entiers peuvent etre condenses en un 
seul entier long). Le quatrieme argument est un pointeur sur la fenetre a laquelle le 
point appartient. 

Si l'utilisateur a reellement clique dans un eontrole, le handle designant ce eontrole 
est stocke a 1'adresse designee par le premier argument, et la fonction FindControl 
retourne en resultat explicite un code identihant la partie du eontrole dans laquelle on 
a clique - . 

Si l'utilisateur n'a pas clique - dans un contrdle, e'est la valeur zero-long qui est 
stockCe a 1'adresse designee par le premier argument, et la fonction FindControl 
retourne la valeur zero. 

Les valeurs susceptibles d'etre retournees par FindControl sont predefinies : elles 
indiquent une partie de contrfile dans laquelle l'utilisateur a clique. 

/* aucune parte do eontrole V 

r bouton simple *l 

f ease 4 cocher "I 

T bouton radio */ 

T fleche du haut ou de gauche d'une barre 'I 

r fleche du bas ou de droite d'une barre V 

I* region Page Up 4 line barre de defilement */ 

r region PageDown d'une barre da defilement V 

f curseur de defilement d'une barre 7 



Les autres valeurs sont soil reserves a 1'usage interne du systeme, soit utilisables 
par les applications qui definissent leurs propres types de contrdles. 

Une fois que la fonction FindControl a retourne les renseignements qu'on attend 
d'elle. il reste a gerer le eontrole, et e'est la fonction TrackControl qui s'en charge. 
Des que le bouton de la souris est presse dans un eontrole visible et actif, cette 
fonction est appeiee : elle suit les mouvements de la souris et agit de maniere 
appropriee jusqu'a ce que le bouton soit relache, S'il y a des parties de controles a 
mettre en lumiere, elle le fait, si un curseur de defilement doit Stre dgplace, il Test. Par 
contre, TrackControl n'assure pas toute seule le defilement du contenu de la fenetre 
(ou toute autre action liee a 1'emploi de la barre de defilement), e'est a l'application de 
la gerer, en fonction de la valeur prise par le contr61e et de la valeur qu'il avail au 
debut de Taction. 

La fonction TrackControl admet quatre arguments. Les deux premiers reprdsen- 
tent 1'abscisse et Tordonnee en coordonnees globales du point ou debute Taction, tel 
qu'il a 6t€ enregistre dans Tev6nement de type MouseDown, Le troisieme argument 
donne 1'adresse de la procedure qui gere Taction de TrackControl. Le quatrie-me 
argument est le handle qui designe le contr&le en cours de manipulation. La fonction 
retourne z£ro si la souris est relachee en dehors de la partie du eontrole ou le bouton a 
ete enfonce, ce qui signihe que l'utilisateur a change d'avis en cours de route et qu'il 
ne faut entreprendre aucune action, ou une valeur Sgale a celle qu'avait retournee 
FindControl juste auparavant, ce qui signifie que l'utilisateur est alle au bout de son 
idee et qu'il y a une action a entreprendre. 

Pour gerer un bouton, TrackControl n'a pas besoin de procedure d'action, et on 
peut passer zero-long dans ce cas. Par contre, il est indispensable de crfier une 
procedure d'action pour la gestion des barres de defilement. En effet, tant que 
l'utilisateur n'a pas relache le bouton de la souris, TrackControl appelle periodique- 
ment cette procedure, ce qui permet une action continue, generalement un defile- 
ment. 



#define NoPan 
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II y a deux moyens d'appeler une procedure d'action. Le premier, c'est de passer 
son adresse a la fonction TrackControl, en direct, ainsi que nous I'avons fait dans 
I'ejcemple. Le second, c'est de stacker cette adresse au niveau du controle lui-meme, 
dans 1'un des champs de sa structure. On utilisera pour cela la procedure SetCtlAction 
(voir description plus loin). Pour invoquer la procedure d'action, il suffira de passer un 
argument n£gatif a TrackControl : 

part2 - TrackControl(tache. where, -1 L, ctl); f invoque une procedure 

au niveau du controle *i 

TrackControl ira rechercher dans la structure du controle s'il y a une procedure 
d'action, auquel cas il I'executera pdriodiquement. S'il n'y a pas de procedure, pas 
d'action (tout comme si 1'argument avait 6t£ ze"ro-iong). 

Cette seconde solution est sans doute plus elegante, parce que plus lisible : on a 
une procedure dediee pour chaque contr61e de type cadran, et qui se borne aux seuls 
tests necessaires. Nous verrons les deux methodes dans les exemples en fin de 
chapitre. 

Une procedure d'action est une routine de type Pascal, qui admet deux 
arguments : le code designant la partie du controle iiwoquee et le handle designant le 
controle invoque. C'est TrackControl qui lui passe ces arguments. La procedure doit 
examiner la partie du contr6le invoquee et agir en consequence : d'une part en 
ajustant la valeur du controle en fonction du defilement (ce qui permet notamment au 
Control Manager de le redessiner correctement), d'autre part en executant Taction 
reelle du defilement, liee a cette nouvelle valeur, Un modele de procedure d'action est 
donn£ plus loin dans ce chapitre, insistons sur le fait qu'il doit s'agir d'une procedure 
Pascal, sa declaration sera done de la forme suivante : 

pascal void Defilement(part K contro1) 
int part; 
Handle control; 

• Apres un gvenement de type KeyDown. 

Un autre type d'gvenement doit £tre pris en compte dans la gestion des controles : 
la louche de clavier enfonc^e. Nous avons dit qu'il existait une notion de bouton par 
defaut, pour lequel il est equivalent de cliquer dedans ou d'enfoncer la touche Retour 
ou Entr£e. Quand un evenement de type KeyDown est retourne, il faul bien verifier 
s'il s'agit d'un Retour, auquel cas une action est a entreprendre, a condition que le 
bouton par d£faut existe et soil visible et actif a ce moment-la. 

Rien n'empeche egalement d'imaginer des touches de commandes li£es a 1'emploi 
de tel ou tel bouton, a 1'instar des articles des menus deroulants. (Par exemple un 
bouton pourrait etre invoque par la combinaison des touches Pomme et 1'initiale de 
son titre). C'est evidemment a ['application de gerer de telles commandes, le 
programmeur gardant toujours a 1'esprit qu'il ne doit pas desorienter I'utilisateur (pas 
de confusions avec les menus d^roulants, par exemple) et qu'il ne doit pas compliquer 
la tache d'un eventuel traducteur de son application ! 

Handle boutonDef ; r handle sur le bouton par defaut 7 

long un Point; r un point appartenant a ce bouton 7 

case KeyDown ; 

if [tache. modifiers 5 ApplaKey) 

f repondre k la commands, geneValement en appelant Men u Key 7 
else 
( 
if (condition) /* si on sait qu'on a affaire k une fenetre contenant des controles 7 

( 

if (tache. message & OxFF «= 1 3) f touche Retour ou Entree ? 7 
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{ 

il (TsstContraI(unPoint,boutonDaf)) 

f action du bouton par defaut */ 
I 

f I'applicaSon (ait ce qu'elle a a fa ire avec le caractfire selectionn* */ 
} 

Complique, n'est-ce pas ? On commence par tester si la touche Pommc est 
enfoncee (on agit dans ce cas en consequence). On teste ensuite dans un environne- 
ment multifenetres si une condition est remplie : la fenetre doit posseder des controles 
geres par 1'application pour qu'il y ait un interet a tester la touche Retour. On teste 
ensuite le caractere correspondant a la touche enfoncee. Et si c'est la touche Retour 
(code ASCII 13 decimal), on teste enfin 1'etat du contrfile. 

La fonction TestControl admet trois arguments : 1'abscisse et I'ordonnee d'un point 
dont on venfie qu'il appartient a un controle dont le handle est passe en troisieme 
argument. Elle retourne la partie du controle invoquee, ou zero si le point 
d 'appartient pas au controle. Cette fonction est generalement a usage interne (elle est 
appelee par Find Control et TrackControl). Nous nous en servirons pour tester 1'etat 
du controle, en passant en argument un point dont nous savons pertinemment qu'il 
appartient au bouton defini par defaut. Si la fonction retourne zero, c'est que le 
bouton est soit desactive, soit invisible, et il serait desastreux de declencher Taction 
correspondante alors que l'utilisateur n'a pas le droit de cliquer dedans ! 

Complique, certes, mais heureusement que le Dialog Manager gerera pour nous le 
bouton par defaut dans les fenetres d'alerte et de dialogue, en transforrnant 
I'evenement de type KeyDown en evenement de type MouseDown dans le bouton par 
defaut si les conditions pr^alables sont remplies. 

Une facon beaucoup plus simple d'agir etait d'aller tester directement deux champs 
du Control Record, a savoir CtlFlag (pour savoir si le controle est visible ou pas) et 
CtlHHite (pour savoir s'il est actif ou pas). Nous n'avons pas voulu donner la definition 
de cette structure, on constate qu'il y a des cas ou on ne peut s'en passer ! 

On verra plusieurs exemples de manipulation des controles : deux localisations, 
une utilisation des barres de defilement en tant que cadrans avec utilisation de tous les 
types de boutons. Dans le chapitre consacre au Dialog Manager, comment sont geres 
les boutons dans une fenetre de dialogue. Enfin, dans le chapitre consacre a la routine 
TaskMaster, nous verrons comment laisser le systeme gerer a notre place le 
defilement du contenu des fenetres possedant des barres de defilement dans leur 
region contour. Ii est tout de meme plus agreable de laisser le systeme accomplir tout 
seul certaines taches p&tibles ! 



Modification et dessin de controles 

Dans les exemples qui suivent, la variable ctl designe un handle sur contrdle, tel 
qu'il a pu etre retourne par la fonction NewControl. 

• On peut modifier le litre d'un bouton (quel que soit son type), grace a la 
procedure SetCtlTitle (qui en outre redessine le contrdle). Deux arguments : un 
pointeur sur la chaine de type Pascal designant le nouveau titre et le handle reperant le 
controle. On peut par ailleurs connaitre le titre d'un contrdle grace a la fonction 
GetCIITitle, a qui on donne en argument le handle reperant le controle et qui retourne 
un pointeur sur la chaine Pascal contenant le titre. 

char titrej ) ■ "VISNouveau titre"; 
Pointer oldTiUe: 

oldTille = GetCtfTltle(ctl); /* on rdcupere un pointeur sur le titre actuel 7 

SetCtlTlt1e(titre,ctl); f on change le titre du contrfite */ 
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• Un eontrole peut etre rendu invisible par la procedure HideControl et visible par 
la procedure ShowControl. Un seul argument dans les deux eas : le handle designant 
le eontrole. Faire apparaitre ou disparaitre des controles dans une fenetre doit etre 
motiv^ par de fortes raisons : il ne s'agit pas de desorienter Futilisateur. L'offre de 
nouvelles options a la suite d'un choix de cet utilisateur peut etre un exemple : on rend 
visibles a ce moment-la de nouveaux contr6les, qui avaient &t€ cre^s invisibles. 

HideControl (cii); t le eontrole est rendu invisible '/ 

ShowControl it ill: /* le controls est rendu visible */ 



• On preierera gen£ralement cr£er tous les contrfiles visibles, quitte a rendre 
certains d'entre eux inactifs en fonction de la configuration actuelle. Pour activer ou 
desactiver un eontrole, pour mettre en lumiere une partie de eontrole, une seule 
procedure : HiliteControl Deux arguments : le second est le handle representant le 
eontrole, le premier est un entier sur 16 bits dont la valeur determine Taction a 
entreprendre : 

- la valeur signifie que le contr6)e est actif mais qu'il n'est pas mis en lumiere. S'il 
etait precedemment inactif, il est reactive et redessine ; 

- une valeur entre 1 et 253 est comprise comme une partie d'un contr61e (actif) qui 
doit etre mis en lumiere (par exemple la fleche d'une barre de defilement). Ces valeurs 
ont etc vues plus haut ; 

- la valeur 254 est rfeervee ; 

- la valeur 255 signifie que le eontrole est rendu inactif, et il est redessinfi en 
consequence. 

On retiendra les deux appels suivants : 



Hi[ileControl(255,cll); /* le eontrole est desactive, il apparait estompe V 

HlllteComrol(O.ctl); r le contr6le est reactive, il apparait normal */ 

• Pour dessiner 1'ensemble des controles associes k une fenetre, on utilisera la 
procedure Dra« Controls Un seul argument : le pointeur designant la fenetre. Lieu 
typique oil cette routine doit etre employee : dans la reponse a un ev^nement de mise 
a jour (update event), entre BeginUpdate et EndUpdate. En effet, les routines telles 
que Select Window ou ShowWindow n'appellent pas automatiquement DrawControls. 
mais generent plutot de tels evenements. 

II n'existe aucune routine permettant de dessiner un seul eontrole. Pour ce faire, on 
peut utiliser une astuce : declarer invalide le rectangle contenant le eontrole, par 
InvalRect (voir le Window Manager), ce qui genere un evenement de mise a jour pour 
la fenetre et provoque 1'appe) a DrawControls, le dessin etant limite a ce rectangle. 

• Deux routines permettent I'acces k la valeur libra (un entier long) associee k un 
eontrole. La procedure SelCtlRefCon permet de fixer une telle valeur, la fonction 
GetCtlReFCori retourne la valeur de ce champ pour le eontrole passe en argument. 

long valeur; 

valeur - GWCtlBefCon(cti); /* on recupere la valeur contenue dans le champ 7 
SetCtlRefCon(vateur4l ,ctl); r on fixe une nouvelle valeur */ 

• Deux routines permettent Facets a la procedure d'action liee a un eontrole. La 
procedure SetCtlAction permet de donner I'adresse d'une nouvelle procedure 
d'action, la fonction CetCUAction permet de recupeter i'adresse de la procedure 
actuellement utilised par le eontrole (ou zero-long). 
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void MonAction( ); f declaration d'une fonction "1 

void (*action)( ); t action est I'adresse d'une fonction qui ne retourne pas d'argument */ 

action = GetCtlAction(ctl): 

S e tC tl Ac tion(M on Action, cf:); 

Un petit mot de C au passage. Pour execute r explicit e merit la fonction dont le 
pointeur est retourne par GetCtl Action, on doit declarer action comme ci-dessus, et on 
utilisera ['instruction ('action) (argl , arg2) pour lancer cette fonction. Mais en regie 
generale, on ne fait que stocker I'adresse, pour un eventuel rdtablissement ulteneur 
(quand on change plusieurs fois de procedure d'action). Alors, on peut simplement 
declarer action de type Pointer. 

• Notons enfin l'existence de deux procedures qui permettent de changer la 
position d'un contrdle dans la fenetre, MoveControl et Drag Control. L'application 
utilisera ces appels pour des contrfiles particuliers qu'elle pourrait g6rer elle-meme, 
par exemple des simples boutons vus non pas comme des boutons-poussoirs (cas 
classique d'utilisation), mais comme des objets dont la localisation peut changer en 
fonction des evdnements (pourquoi les pions d'un jeu de dames ou les lettres d'un jeu 
de scrabble ne seraient-ils pas gdres comme des contrfiles ?). 

MoveControl ne fait que redessiner un contrfile ailleurs dans la fenetre apres l'avoir 
efface de sa position initiale. On donne en argument les nouvelles abscisse et 
ordonnee du coin superieur gauche du rectangle englobant le contrfile, ainsi que le 
handle designant le contrfile. 

DragControl agit en liaison avec 1'utilisateur. C'est lui qui deplace le controle a 
I'interieur de la fenetre. Durant le defacement, la silhouette du contrfile suit les 
mouvements de la souris, de la meme maniere qu'un deplacement de fenStre (pratique 
plus familiere a 1'ensemble des utilisateurs). DragControl termine en appelant 
MoveControl quand le bouton de la souris est relache. 

Six arguments pour DragControl : ['abscisse et l'ordonnee du point de depart de 
Taction, traduites en coordonnees locales ; un pointeur sur un rectangle limitant le 
champ de deplacement ; un pointeur sur un rectangle de grace (voir DragWindow 
dans le chapitre consacre au Window Manager pour avoir plus de renseignements a ce 
sujet) ; un entier designant une contrainte dans le deplacement (0 : pas de contratnte, 
1 : le deplacement est strictement horizontal, 2 : le deplacement est strictement 
vertical) ; le handle sur le contrfile tncrimirie\ 

DragControl comme Drag Window font appel a une fonction plus generate du 
Control Manager, qui s'appelle DragRect. Nous n'entrerons pas dans le detail de la 
description de cette fonction. 



Valeurs prises par un contrdle 



• Pour fixer la valeur associee a un contrdle (FALSE ou TRUE pour une case a 
cocher ou un bouton radio, une valeur arbitraire pour une barre de defilement), on 
emploiera la procedure SeCtlValue. Deux arguments : ia valeur a donner (entier sur 
16 bits) et le handle designant le contrfile. Notons que la procedure redessine le 
controle en fonction de sa nouvelle valeur (case cochee ou bouton radio plein si 1, case 
non cochee ou bouton radio vide si 0, curseur de defilement au bon endroit en cas de 
barre de defilement). Pour connaitre la valeur associee a un contrfile, on emploiera la 
fonction GetCtlValue. Elle retourne la valeur (dans un entier sur 16 bits) associee au 
contrdle dont le handle est passe en argument. 

- cas d'un bouton simple. On ne doit pas toucher a sa valeur, qui n'a aucune 
signification ; 

- cas d'une case a cocher. On donne la valeur ou 1 a ce contrdle (ou plus 
geniralement une valeur nulle ou non nulle), et quand 1'utilisateur clique dans une 
telle case (et que la souris est relichee dans cette case), on agjt de la maniere 
suivante : 



212 ! BOlTE A OUTILS DE L" APPLE IIGS 



int valeur; 

valeur = GetCtlValue(ctI); f si le contrfile est une case a cocher... */ 
SetCUValue(1 valeur, ctl): f ...on charge son elal: selectionnS < — > non sfileclionne 7 
/* ou bien: SetCtlValue(!valeur, ctt); dans un cas plus general */ 
T I'application fait ce qu'elle a a fairs a la suite de ce changement 7 

Le fait de fixer la valeur redessine la case correctement. 

- cas d'un bouton radio. Des qu'on fixe la valeur d'un bouton radio, le Control 
Manager redessine tous les boutons appartenant a la m6me famille. II suffira done de 
donner la valeur 1 {ou toute autre valeur non nulle) au bouton radio sSlectiomie par 
1'utilisateur, pour que tout fonctionne correctement : si le bouton etait deja 
sfilectionnfi, il le reste, s'il ne I'etait pas, il le devient et tous les autres sont 
d£s61ectionn£s. On est stir de la sorte qu'au moins un, et un seul, bouton est 
selectionne dans ['operation. 

S»tCtlValue(1,cll); f cas d'un bouton radio: ultra-simple! 7 

f I'applicatbn tait ce qu'elle a a (aire a !a suite de ce changement 7 

- cas d'une barre de defilement. C'est dans la procedure d'action que la valeur sera 
fixee, en fonction de la partie selecttonnee du controle. Cette procedure sera appelee 
r^petitivement par le Control Manager tant que 1'utilisateur n'aura pas relache le 
bouton de la souris. 



pascal void Defile ment(part, control) 
int part; 
Hands control; 

{ 

int valeur, min, max, unitflech, unitpage: 

if (part < S) return; /* if (part — 0) return: ...si on est sur que le contrc-le est une barre 7 
r calcul de unitflech et unitpage en fonction de ce que represents la barre 7 
r calcul de min et max grace a GetCtlParame. voir point suivant 7 
valeur - GetCtlValue(control); 
switch(part) 
{ 
case UpArrow. 

valeur -m unitflech; /* on retire une unite 7 

break; 

case DownArrow. 

valeur +=. unitflech; f on ajoute une unite 7 

break; 

case PageUp. 

valeur —= unitpage; /* on ret re une unite- page 7 

break; 

case PageDown. 

valeur +» unitpage; l* on ajoute une unitS-page 7 

break; 

) 

if (valeurcO) valeur - 0; I* borne inferieura 7 

if (valeuomax-min) valeur ■ max-min; t bome superieure "/ 
SetCtl Value(valeur,control); /* on fixe la nouveile valeur 7 

r action resultant du defilement, tenant compte de la nouveile valeur V 
1 
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On constate que seules les fleches et les bandes de defilement sont prises 
effectivement en compte. Le Control Manager se debrouille tout seul pour suivre les 
manipulations du curseur de defilement en fonction du deplacement de la souris, et 
fixe la nouvelle valeur du controle des que l'utilisateur a relache le bouton. En fait, 
seule Taction resultant de la nouvelle valeur prise par le controle est commune a toutes 
les parties de la barre de defilement. 

Le test en premiere ligne vise a exclure tous les boutons, dans le cas oil la 
procedure d' action est appelee a parti r de TrackControl, sans test prealable sur la 
nature du controle. Si par contre on est sur qu'on a affaire a une barre de defilement, 
soit parce qu'on le teste avant, soit parce que la procedure a ete memorisee dans le 
champ adequat du controle grace a SetCtlAction, le test peut se borner a verifier que la 
valeur prise par part est non nulle : on ne fait rien si l'utilisateur est en dehors du 
contr61e. 



Nous verrons deux exemples complets d' utilisation des procedures d' action en fin 
de chapitre. 

• Dans le cadre des barresde defilement, le curseur materialise une valeur entre un 
minimum et un maximum. II est parfois necessaire de changer ce minimum ou ce 
maximum. Par exemple, si la barre est censee reperer un document de 200 lignes dans 
une fenetre affichant 20 lignes, le minimum sera fixe a 20 et le maximum a 200, Si 
l'utilisateur se sert de son clavier et rajoute une ligne au document, le maximum doit 
devenir 201. S'il se sert de sa souris et qu'il diminue la hauteur de la fenetre, ramenant 
I'affichage a 16 lignes, le minimum doit devenir 16. Notons que la valeur prise par le 
contrrjle ayant un minimum a 16 et un maximum a 201 est comprise entre et 201-16. 
C'est pourquoi ces termes de minimum et de maximum semblent assez impropres ! 



La procedure SelCtlParams se charge de modifier les bornes associees a une barre 
de defilement. Trois arguments : la nouvelle valeur maximale, la nouvelle valeur 
minimale (toutes deux sur 16 bits) et le handle designant le controle. Souvent, une 
seule des deux bornes doit itre modifies. Si on passe la valeur - 1 dans 1'un des 
arguments, la routine comprendra qu'il s'agit d'un code signifiant : ne pas modifier 
cette valeur. Les deux exemples cit£s ci-dessus se coderont done ainsi : 



SetCUParams(201 , -1 , ett);/* modification de la borne superieure du contrSle 7 
SetCUParams(-1, 16, ctl); P modification de la borne inferieure du controle */ 



De plus, cette procedure redessine le controle en tenant compte des nouvelles 
valeurs, notamment en repositionnant et en redimensionnant correctement le curseur 
de defilement. 



Pour connaitre la valeur des bornes, on utilisera la fonction GetCtlParams, qui 
retourne dans un entier long le minimum (mot le moins significatif) et le maximum 
(mot le plus significatif) associ^s au contr61e repere par le handle pass£ en argument. 



long val ; 

int max, min; 

val = GetCtlParams (ctl): 

min - (int) val; P mot bas V 

max - val » 16: /* mot haul 7 
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Figure VII. 7 Les TSleurs prists par une barre de dtfllemellt 

• Pour mieux comprendre la signification des valeurs associees a une barre de 
defilement, regardons les figures VII. 7 et VII. 8. 

Dans la figure VII. 7, on suppose que la barre traduit un certain nombre de lignes 
dans un document dont seule une partie peut etre visualisee. Au depart (a gauche), le 
document fait 200 lignes numerotees de a 199 (valeur dite maximale), la partie 
visualisee correspond a 20 lignes (valeur dite minimale), et la ligne portant le 
numdro 30 est la premiere ligne visible. On constate que le curseur est a son maximum 
des que la ligne 180 est atteinte, done le contr&le ne peut prendre une valeur qu'entre 
et 180 (ou 180 ■ 200 - 20, e'est-a-dire total du document moins nombre visualise^. 

Au centre, la barre est representee apres 1'effacement de 40 lignes. La valeur ne peut 
plus etre comprise qu'entre et 140. A droite enfin, on a opere' une reduction 
d'echelle : on visualise tou jours 20 lignes a la fois, mais dans un espace plus restreint. 
Aucune des valeurs n'a change par rapport au dessin precedent, seule la taille du 
controle a it€ modifiee (en fait le rectangle qui l'englobe). Dans les trois cas, le 
curseur chevauche la frontiers de deux « pages ». 

Dans la figure VII.8, les barres traduisent un etat, qui prend huit valeurs en haut, 
seize valeurs en bas. Ces valeurs sont les valeurs « maximales ». Dans les deux cas, la 
valeur « minimale » est egale a 1, puisque la barre traduit un etat. La valeur prise par 
ie controle est comprise entre et max-min, Le curseur de defilement ne pourra 
jamais chevaucher deux etats. 
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Figure VH.H. l.tN valturc prists par une barre de defilement (bis). 
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Figure YTI. 9 La fenetre de rexemple. 



Exemple complet : controler les couleurs 

Cet exempie consiste a ouvrir une fenetre dans laquelie seront manipules trois 
cadrans en forme de barre de defilement, permettant de regler le niveau de rouge, le 
niveau de vert et le niveau de bleu intervenant dans la composition de la couleur 
extetne a la fenetre... juste pour s'amuser a manipuler des barres de defilement a la 
main. On pourra ainsi visualiser les 4 096 couleurs possibles de 1'Apple IIGS. 



^include <toob h> 
#inctude <»ntete.h> 

void DefitementO: 
ParamList maFen = { 

s\zsoi{PaiamList), 0x20 AO, 

[0, 0, 0, 0), 0L, 0, 0, 

0, 0, 0, 0. 

0, 0, 0. 0, 

0L, 0, OL, OL, OL, 

{70,35,150,285). -1L, 0L}; 
TaskHsc tache; 
Powrferwind; 
int indie -TRUE] 

Handle barR, barV, barB; 



r contient la definition des termes en gras 7 
r contient la definition des termes en italique 7 

f la procedure d'action */ 
r ia fenfitre qui sera utilisee */ 
,0L, 



t ce que manipule GetNextEvent 7 
f poinleur sur fenetre 7 
/* indicateur de fin de boucle 7 
f handles sur les 3 barres 7 
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PROGRAMME PRINCIPAL ' 



main() 

( 

Pointer my Wind; 
fleet r; 
int mylD; 

mylD-debut_appl(0); 
Fl ush Event»{ EveryEvenl, 0) ; 
myWind - MewWlndow(SmaFen); 
SetPort(myWind); 
SetRect(&r,65.1 8,225,34) ; 
barR - NewContro1(myWind,&r,' 
SetRact{&r,65,38,22S,54): 
barV - NewControl(myWind,&r,' 
S»tRwl{&r .65.58,225,74) ; 
barB - NewControI{myWind,&r, 

Desktop(5. 0x40000022); 
Couleur( ); 



r pointeur sur fenfitre 7 
r un rectangle */ 

~ identifiant de I'application */ 

r initialisations an mode 320 */ 
r la file d'evenements est videe 7 
r ouverture de la fenStre... */ 
T ...qui deviant la port courant 7 

r creation de la barre des rouges */ 
•,0x1 C,0,1 ,1 6,Scro)lProcflL,Q\.y. 

f creation de la barre des verts '/ 
•,0x1C,0,1 ,16,Scro//Proc,0L,0L); 

r creation de la bane des blaus 7 
-.0x1 C,0,1 ,1 e.ScroflProcOLOL); 

f la couleur 2 sera utilisee pour redessiner le bureau */ 
T on lui donne la bonne couleur V 



do { 



if(K3etNextEveM(eVery£Vent, fttache}} continue; r nouvel evenemant •/ 

switch(tache.i*Tiay r* quel evenement? 7 

case MouseDown : f bouton souris enfonce 7 

souris Dans( Find Wl ndow{&wirtd. tache. wham)) ; 
break; 



r louche enfoncee */ 
r on sort, e'est finit */ 



case KayDown : 
indie - FALSE ; 
break; 



case UpdateEvt : f mise a jour de la fenStre ' 

B eg I n Update) tache . message) ; 
MoveTo(1 0,31 }; DrawCStrinsCRouge - ): 
Mov»To(10,51); DrawCStr1ng("Verr); 
MoveToflO.VI); DnawCStrlng("Bleu"); 
Mov»To(82,1 S) ; DrawCStjingi-OI 23456789ABCDEF"}; 
DrawCon trol sftache. ; nessage) ; 
End Upd at»(tache . message) ; 
break; 



while(indic); 

aosaWtndow(rrryWtnd); 
quitter(mylD); 



r fin de la boucle d'evenement 7 

f of i (errrxj la fenetre. . . '/ 
r ...etons'enva V 



/•**" FONCTION SOUR IS DANS; reponse a un die souris ' 
souris Dans( code) 

code; f code retourne par FlndWindow V 



switch (code) 

1 

case wlnComent : 

RepCtl(wind); 

break; 



r quel code? 7 



r dans le contenu de la fenetre V 
r on va repondre aux contr81es 7 
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case wlnOrag : 



T dans le cadre de la fenetre 7 



DragWlndow(0, tache.ivhwB, 0, OL. wind); r on suit la souris 7 
break; 



/***** FONCTION HEPCTL; bouton souris enfoncS dans Tune des barres ' 



RepCtJ(fen) 
Pointer fen; 



r fenetre oil la souris a ete enfoncee 7 



Handle oil; 
int part: 



r handle sur controle 7 
r parte de controle 7 



part = FlndControl(&ctl, tache.tvrrare, fen); r a-t-on clique dans un contr6le? 7 
if (part) TrackContro I (tache. whsrs, Defilement, ct);f pui, alore. gerons le 7 



/""* PROCEDURE DEFILEMENT!": bouton souris enfonce dans I'une des barres ' 
pascal void Defilement(part, control) 



int part: 
Hanote control; 



r partie du controls 7 
r handle sur contr6le 7 



int valeur; 
char msg[3]; 

if (part < 5) return: 

valeur - GetCtlValue(control); 

switch(part) 

i 

case UpAirow : 
valeur — 1 ; 
break; 

case Dov/nAmm: 
valeur +- 1 ; 
break; 

case PageUp : 
valeur -■ 4; 
break; 

case PageDown : 

valeur += 4; 

break; 
} 



f valeur prise par le controls 7 



f dans ces cas, on peut quitterl 7 

T valeur actuelle du contrfile 7 

r dans quelle parts I'utilisateur est-il? 7 

f fleche de gauche 7 
T on retire une unite 7 



r fleche de droite 7 
r on ajoute une unite 7 



f bande de gauche 7 
t* on retire 4 unites 7 



I" bande de droite 7 
r on ajoute 4 unites 7 



if (valeur<0) valeur ■ 0; 

if (valeur>15) valeur - 15; 

SetCt I Val ue (valeur .control) ; 

sprintf(msg,"%x ".valeur); 

if (control — barR) MoveTo(235,31); 

else if (control — barV) MoveTo(235,51 ) ; 

else if (control - - barB) Mov*To(23 5,71 ) : 

DrnwCString(msg): t on ecrit la nouvelle valeur k droite de la fleche 7 

Couleur( ): /* et on change la couleur du fond d'ecran 7 
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FONCTION COULEUR: change la couleur du fond cWcran " 



Couleur( } 

int coul; 

r calcul de (a nouvelle couleur / 
coul - (G*tCtlValue[barR)«:8) + <G«CtlValu»(barvy<4) + G*tCtlValue{barB); 
SetCo!erEntry(0, 2, coul); /* stockage dans la 2eme couleur de la palette systeme */ 



Exemple complet : des boutons et des barres 

Cet exemple permet de visualiser certaines routines du Control Manager, en 
employant des boutons de tout type et deux barres de defilement. L'interet de 
I* application, hormis son aspect pedagogique, est evidemment nul. 

La figure VII. 1 donne une idee de l'ecran au debut de ['application : quatre 
boutons a droite, le premier pris par defaut, deux cases a cocher et deux boutons radio 
a gauche, le tout separd par une grosse barre de defilement verticale, et une barre 
horizontale, moins epaisse. 




Figure VI J- III 

Quand on clique dans le bouton numero 1 (ou si on utilise les touches Retour ou 
Entree), on sort de 1' application. Le bouton 2 desactive les cases a cocher, reactive les 
boutons radio et rend visible le bouton 3, s'il y a lieu, et devient invisible. Le bouton 3 
desactive les boutons radio, reactive les cases a cocher et rend visible le bouton 2, s'il y 
a lieu, et devient invisible. Le bouton 4 reactive tout, rend visible tout. 

Les cases a cocher et les boutons radio reagissent correctement, mais aucune action 
n'est liee a leur valeur. Les barres de defilement reagissent correctement, et agissent 
sur les entrees et 15 de la palette de couleurs utilisee, ce qui permet avec certaines 
combinaisons de ne plus rien voir du tout ! La figure VII. 10 montre une belle 
inversion du blanc et du noir. 

Enfin, dans le bas de la fenetre sont affichees les valeurs retournees par les 
fonetions FindControl et TrackControl. 



#include <tools.h> 
((include centete.h> 



/* contient la definition des termes en gras 7 
f contient la definition des termes en italique */ 
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void DefilH( ): 
void DelilVf ); 
ParamList maFen - [ 

5izeot(Paramiisl). 0x20 AO 

(0. 0. 0. 0). OL, 0, 0, 

0,0,0,0, 

0, 0, 0, 0, 

OL, 0, OL, OL, OL, 

(20,10,190, 310}, -1L.OL}; 
TaskRec tache, 
Pointer wind: 
int indie - TRUE: 
Handle boutonl, bouton2, boutori3, bouton4, 

check 1 , check2, radio 1 , fadio2, barre H, barreV 



f la procedure d'action de la barre horizontal ' 
f la procedure d'action de la barre verticals */ 

r la lenetre qui sera udlisee */ 
0L. 



r ce que manipule GetNextE vent 7 

f" poinleur sur fsnstrs *t 

P indbateur de fin de boucle 7 



r handles sur controls 7 



r k " PROGRAMME PRINCIPAL' 



main( ) 

{ 

Pointer myWind; 

Pact r; 

int mylD; 

char tampon [32]; 



f poinleur sur fenfltre */ 

f un rectangle 7 

r identifiant de I application 7 

r reserve 32 octets en memoire 7 



mylD - debul_appl(0); 

In ItCol o rTab le( tampon) ; 

SetCol o rTabl e(0 .tampon) ; 

Se tCo lorTa b I e( 1 , tampo n) ; 

SetAIISCBs(l); 

Flush Even Vi(EveryEv»m, 0); 

my Wind ■ NewWlndow(&maFen); 

SetPort(myWtnd): 

SetReet(&r,1 85,20,285.40); 



/* initialisations en mode 320 */ 

r on recupere la table de couleurs par defaut 7 

r la table recoil oes valeure 7 

1" la table 1 recoit ces valeurs 7 

Ton rend active la table 1 7 

r la file d'evenements est videe 7 

I* la tenetra est ouverte... 7 

r ...et on peirt dessiner dedans 7 

r creation du bouton 1 7 
boutonl - Nayrt^»ntrol(myWind,5r.^7Bcwtonr,3,0,0,0,SfmptePh3C,0L,0L): 
SatRact(&r,1 85,50,285,70); f creation du bouton 2 7 

boulon2 ■ Nev»Control{myWind,Sr,"\7Bouton2 ",2.0,0 .0. Sirnp/e Aiac,OL,0L); 
SetRect(&r, 185,80,285.100); /* creation du bouton 3 7 

boulonS - NewControl(myWind,&r."\7Bouton3",2.0,0,0,Simp'ef''oc,0L,0L); 
SetRect(&r,1 85,1 10,285,130); /* creation du bouton 4 7 

boutorv4 - NewControl{myWind,4r,"\7Bouton4",2,0,0,O.Sffnp)Bflri>c,OL,OL}; 
SetRect(& r, 1 0,20, 1 1 0, 36} ; f creation d'une case a coche r 7 

checkl -N«»rf^>ntr«l(myWind,iO10Ac0Cher , .0.0,0.0.Chec/rPtoc,0L,0L); 
S e t R e c t ( & r.10,40,110,56); f creation d'une case k coche r 7 

check2 . NewContr«l{myWind,ar,'M3Deja cochee-,0,1,0,0,C/»cltftix;,0L,0L); 
Se<RMt{fir,10, 70, 110,85); f creation dun bouton radio 7 

radio 1 - NewControl(myWind,&r,TIOOptbri 1".2,1,0,0,fladVoflroc,0L,0L); 
SelRec l(* r , 1 ,90, 1 1 0, 1 06) : f creation d'un bouton rad io 7 

radio2 - NewControl(myWind,ar,"\10Oplion 2",2,0,Q,0,RadK>ftoc.0L,0L}; 
SotRect{Sr, 10, 120,130, 140); f creation de la barre horizontals * 

barraH - NewControl(myWirtd,Sr ,-,0x10,0,1 ,16,ScnjffProc,0L,0L): 
SetCrJAclion{DerilH,barreH): C on fixe sa procedure d'action 7 

SetRect(&r, 135, 10,165,140); t creation de la barre verticals 7 

barreV - N»wControl(myWlnd,Sr,",0x03,15,1,16,SeroJllPrt»c,0L,0L); 
SetCUActlan(Defirv\barreV); t on (we sa procedure d'action 7 



do { 



il(IGetN«xtEvent(£nsoy£ vent, S tache)) continue; 
switc h(tac he. what) 

{ 

case MouseDown : 

sourisDans{FlndWii»dO¥«(&wind, teohe. when)}; 

break; 



r evenement suivant 7 
r de quoi s'agit-il? 7 



r bouton souris enfonce 7 
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case KeyDown : F touche clavier enfoncGe V 

if ((tache, message & OxFF) — 1 3) f Retour ou Entree? 7 

indie - FALSE ; /* oui, on sort "I 
break; 

case UpdaleEvt : /* fenetre 4 mettre A jour V 

Beg i n Update tache . message) ; 

DrawContro1s{lache message): P dessin des centrales 7 

MoveTo(10 r 165}; DrawCStr1ng("FindControl:"); 

MoveToj 160,155); DrawCString( Track Control"); 
E n d U pd a te ( [a c he message) : 
break; 
) 
I 
while(indic) : r tin de la boocle d'evenerrtenl V 

CloseWindow(myWind) : * on ferrne la tenetre. . */ 

quitter(my I D) ; f . . .9 1 on s'e n va V 



/"*" FONCTION SOUFilSDANS; rerxinse a un die souris *****/ 
souris Dans(code} 

coda ; /* code retoume par F Ind Window 7 

switch (code) 

{ 

case winContent : /* bouton ertfortce dans le contenu de la fen&tre V 

if (wind I- FrontWindcwQ) Ssi«ctWindow(wind); T inutile, il n'y a quXine fenetre! 7 
else RepCM(winc!); r reponse aux contrdles 7 

break; 

) 



/"'" FONCTION REPCTL: souris enfoncee dans fun des coctrfiles *"**/ 
flepCU(fen) 
Pointer fen; r fan £ ire oil la souris a ele bnfoncee */ 

{ 

Handle ctl; /* handb sur contrcle 7 

int parti ,part2; f parties de contrfile *l 

char msfj[1QJ; 

parti - FlrvdControl(Scli,tache.kvr)ere,fen); f dans quel contrclo? 7 
sprintf(msg,"%d ", parti); 

MoveTo( 1 06 , 1 6 5) ; DrawCStrf ng(msg) : f ahlchcige de la . aleur re tournee 7 

MoveTo(266.'i6£); OawCStringf "); 

if(part1 ) C v.iriunt da. :3 un ccntrrjie. . . 7 

{ 

part2 = TwckCo ntro i (tache, Hrfreri.- j L.ut! ) ; f , . slo rs o n le gere 7 
sprintf(msg,"%d *,part2) ; 

Mov»To(266, 1 65) ; DrawCStr!ng(msg) ; /* affi chage de !a valeur retournee '/ 
if (part2 — part; ) /* I'utilisateur a rel^che la souris 

dans la bonne partie du contra le 7 
switch(partl) f quelle parte? 7 

I 
case SimpleButton : r dans un foctton classique 7 

if (ctl — houtoni ) indie - FALSE : f dans le bouton 1 : on sort! 7 

else if (ctl =- bouton2) r dans le bouton 2 7 

{ 
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HiliteConfirol(255,check1); /* on desaclive les cases a cocher */ 

Hi li teContro I (2 55 ,check2) ; 

Hi1iteComral(0,radio1); I" on active les boutons radio 7 

H ! I i teCo n t ro I (0 ■ . radi o2) . 

HI deControl(boutort2) ; f on cache le bouto n 2 */ 

ShowControl(bouton3); f on moritre le bouton 3 */ 



T dans le bouton 3 */ 
f on active les cases a cocher */ 



} 

else if (ctt == bouton3) 

[ 

HilltaControl(0,check1) 

H i I i t eC on iro I (0,check2 ) ; 

HillteControl(255,radio1); C on desaclive les boutons radio 7 

HillteControl(255,radio2); 

ShowControl(bouton2J; f on monbs le bouton 2 */ 

HldeControl(bouton3); t on cache io bouton 3 'I 



r (orc4ment dans le bouton 4 */ 



H!ll»ConlTol(0,check1); f on active ies cases a cocher 7 

Hitf teControl (0 , checks) ; 

Hilit*Control(u,iadio1); P Ml active les boutons radio */ 

HI liteControl (0 , radio2} ; 

ShowConirol(0,bouton2); P on montre le bouton 2 7 

ShowCotitrcl(0,bouton3!; f on (nontre !e bouton 3 */ 

} 

break; 

case CbackBox : I" darra una case a cocher 7 

Se'LCtlValueO-GetCtlValuofcllJ.ctJ): f on change sa valeur */ 

break; 

cas* RadhButton : t dans un bouton radio 7 

5etCtlVa)us(l,ctl); r on force sa valeur a 1 (tous las autres passent a 0} */ 

break: 
} 



/""' FONCTION DEFILCOMM : partie communa aux deux procedures d'action *****/ 
r retourne FAUX si la procedure d'action n'a rien a fairs, VRAI dans le cas contraire 
et alors la valeur du controle est placed a I'adresse donnee par le troisieme argument 7 



int DefilComm(part,controt,pval) 

int part; 
Handle control; 
int *pval; 



t partie du controle */ 

I* handle sur controle */ 

I* points ur sur la valeur du controle 7 



' la vaiej du ocn&Cto 7 



if(!part) return FALSE : 
valeur - GetCtlValuo(confrol), 
switch(part) 

{ 

case UpArrow : 

valeur — 1 : 

break; 



r part est nul, on n'a rien a faire */ 
T valour actuelle du controle */ 



I" la nouvellov2leur est fixes. 



case DownAirow : 
valeur += 1 ; 
break; 
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case PageUp : 
valeur -= 4 ; 
break; 

case PageDown : 
vateur +- 4; 
break; 

} 
if (valeur<0) valour = 0; 
if (valeur>15) valeur » 15; 
SetCtl Valuefyaleu r.control) ; 
Cpval) = valeur: 
return TRUE ; 



.dans des bomes correctes... */ 



etdonnee au controls.. , 7 

at passes a la fonction appelante 7 



/***" PROCEDURE DEFILH: bouton souris enfonce dans !c barre horizontals *"**/ 
pascal void DefilHIpart.contrcl) 



int part; 
Handle control; 



/* partie cii uintrole */ 
T handle sur centrfile */ 



int val; 
char msg[3]; 



if ( De f ilCom m( part.co rvtro I , & val )) 



r valeur du controls 7 



f la procsdurs doit-elle continuer? 7 



{ 

sprintf(msg,"%x ",/al); 

MoveTo(1 1 5,1 15); DrawCStrlng(msg): P la vafeur est affichss pres de la barre */ 

S«tColofEntry(1 ,Q,GetColor£ntry(L\val)}: /* I 'entree de la table 1 est modifies 7 



r"" PROCEDURE DEFILV: bouton souris enfonce dans la barre verlicale ' 



pascal void DefiiV(part,controi) 
int part; 
Handle control; 



T partis du contr6le 7 
f handle sur controls 7 



int val; 
char msg[3]; 



I* valeur du controls 7 



/* la procedure doit-elle continuer? 7 



if (DefilComm(part.control,&val)) 

{ 

sprintf(msg,"%x ",vaij; 

MoveTo(1 20,20); DrBwCString(msg); t la valeur est affiches ores de la barre 7 

SetColorEntry(1,15,GotColorEntry(0,val)); f I'entrse 15 de la table 1 est modifiee 7 

} 



CHAPITRE VIM 



LINE EDIT 



PRiNCIPESGENERAUX 

Line Edit est un editeur de texte qui travaille sur des lignes de 256 caracteres au 
maximum. Par editeur, comprenons outil qui permet de cr£er, de modifier et de 
d^truire les lignes de caracteres, les selections de texte etant faites par 1'intennediaire 
de la souris, et les saisies de caracteres par I'intermediaire du clavier. Une application 
utilisera I'editeur pour obtenir de l'utilisateur des renseignements lui permettant de 
fonctionner : grace a Line Edit, il est tres facile de faire saisir du texte par petites 
quantitcs et de le memoriser. Cependant, nous allons voir que certaines fonctions tres 
utiles n'existent pas dans cet editeur de base, et qu'il y a done une importante valeur a 
ajouter pour creer un magnifique Editeur de programmes ! 

Parallelement a I'ddition de texte, Line Edit offre des fonctions d'affichage de 
textes possedant jusqu'a 32 767 caracteres. Ces textes ne peuvent pas etre Sditfis : on 
ne pourra pas selectionner des caracteres, en inserer ou en effacer. II sera par contre 
possible de justifier a gauche ou a droite, ou de centrer un tel texte dans un rectangle 
determine. Ce mode est ideal pour afficher des messages, par exemple pour gerer des 
ecrans d'aide dans des fenelres avee banes de defilement : l'utilisateur n'a pas a 
modifier de tels ecrans ! 

Souvent, une application n'utilisera pas Line Edit directement, mais plutot au 
travers des fenetres d'alerte et de dialogue ger£es par le Dialog Manager, objet du 
chapitre suivant. 



UTILISATION DE LINE EDIT 



Fonctions de Line Edit 

Edition de lignes 

La fonction principale de Line Edit est d'assurer l'edition de lignes de caracteres, 
en transformant les manipulations souris ou clavier de l'utilisateur en selection de 
textes. Ceci se traduira par la presence soit d'un point d'insertion (generalement une 
barre verticale clignotante) soit d'une etendue de texte inversee (texte bianc sur fond 
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noir si les couleurs par delaut sotit utilises, c'est-a-dire I'ecriture en noir sur fond 
blanc). A partir du point d'insertion, des caracteres pourront etre insets (soil paree 
qu'ils sont saisis au clavier, soit parce qu'ils sont colics a partir du presse-papiers), ou 
diStruits (en appuyant sur les touches con ve nab les). A partir d'un texte selection^, les 
memes operations sont possibles, mais la selection est d'abord d£tmite. De plus, un 
texte select ion ne peut etre coupe ou copi£ vers le presse-papiers. 

L'affichage de la selection (inversion des caracteres selectionnes) est entierement 
ge>6 par Line Edit. De meme le couper-copier-coller, pour lequel plusieurs routines 
sont utilisables. Notons toutefois que Line Edit utilise un presse-papiers prive pour ses 
operations d' Edition, et non le presse-papiers commun a toutes les applications. II y 
aura done une manipulation (facile) a faire pour transferer le contenu du presse- 
papiers de Line Edit dans le presse-papiers general, afin de transmettre du texte entre 
deux applications, ou entre une application et un accessoire de bureau. 

Une ligne est limited a 256 caracteres. C'est vraiment une ligne, et non un texte de 
25fi caracteres, c'est-a-dire qu'une ligne ne peut en aucun eas s'6tendre a I'ecran sur 
plusieurs lignes. Si la ligne est plus longue que la largeur de la fenetre, elle disparait 
vers la droite, sans aucune tentative de mise en page. Elle est forcement cadree a 
gauche, elle ne connait pas les tabulations. A une ligne sont affectes une police de 
caracteres, une taille et un style, comme nous le verrons plus loin. Toute modification 
de ces caracteristiques se fait sur la ligne entiere. Enfin, le couper-copier-coller n'est 
pas intelligent, dans le sens oil ies espaces ne sont pas ajustes durant reparation. Cette 
derniere restriction n'est pas grave, dans la mesure oil Line Edit redessine toute la fin 
de la ligne apres un couper ou un coller, 

• Nous allons voir les commandes clavier supportees par Line Edit : 

- les fleches gauche et droite permettent de d£placer le point d'insertion d'un 
earactere a la fois ; 

- les combinaisons Option-fleche (gauche ou droite) permettent de deplacer le 
point d'insertion d'un mot (un mot est un ensemble de caracteres delimites par des 
blancs, le blanc est le earactere de code ASCII $20) ; 

- les combinaisons Pomme-fleche (gauche ou droite) permettent de deplacer le 
point d'insertion au debut ou a la fin de la ligne courante ; 

- les combinaisons Majuscule-fleche (gauche ou droite) permettent d'agrandir ou 
de diminuer une selection de texte earactere par earactere (agrandissement a partir du 
point d'insertion initial, dans les deux sens, diminution a partir du point d'insertion 
courant, dans le sens contraire) ; 

- les combinaisons Option-Majuscule-fleche (gauche ou droite) permettent d'a- 
grandir ou de diminuer une selection de texte mot par mot (regies similaires aux 
precedentes) ; 

- les combinaisons Pomme-Majuscule-fleche (gauche ou droite) permettent d'£- 
tendre la selection du point d'insertion jusqu'i un bout de la ligne ; 

- la touche Effacement efface le texte selectionne ou le earactere situe immediate- 
ment a gauche du point d'insertion (le presse-papiers n'est pas affecte) ; 

- la combinaison Controle-F efface le texte selections ou le earactere situe 
immediatemenl a droite du point d'insertion (le presse-papiers n'est pas affecte) ; 

- la combinaison Controle-X efface le texte selectionne ou toute la ligne si aucun 
earactere n'est inverse (le presse-papiers n'est pas affecte'). 

Remarque La touche Clear (en haut a gauche du pave numerique) est equivalente a 
Controle-X ; 

- la combinaison Controle-Y efface le texte selectionne ou toute la fin de la ligne 
(tout ce qui est a droite du point d'insertion, le presse-papiers n'est pas affecte}, 

• Nous allons voir les manipulations souris et les combinaisons clavier/so uris 
supportees par Line Edit : 

- un die dans une ligne positionne le point d'insertion ; 

- faire glisser la souris dans une ligne fitend ou diminue la selection de texte (en 
suivant des regies similaires aux combinaisons Majuscule-fleche vues plus haut) ; 
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- un double-die dans un mot selectionne le mot ; 

- un triple-die dans une ligne selectionne la ligne enti&re ; 

- la combinaison Majuscule-dic permet d'^tendre ou de diminuer une selection {le 
point d'insertion initial est pris comme pivot). 

o Affichage de testes 

Line Edit permet l'affichage de textes comprenant jusqu'a 32 767 caracteres et 
s'etendant sur plusieurs lignes, les sauts de ligne n'etant pas geres automatiquement 
mais forces par l'insertion de caracteres Retour (code ASCII $D). Aucune operation 
d'edition n'est permise sur ce genre de textes. De plus, un seul style et une seule police 
de caracteres peuvent etre utilises pour un teste donne. Toutefois, quelques fonctioris 
de mise en page sont permises : le texte s'ajustera dans un rectangle et pourra £tre 
justifie k droite ou a gauche, ou centre horizontalement a l'int^rieur de ce rectangle. 
Aucune tabulation n'est g£r£e. 



Donnees manipulees par Line Edit 

Pour permettre l'£dition d'une ligne a l'£cran, Line Edit a besoin d*un certain 
nombre de renseignements, tels que 1'endroit ou afficher le texte, l'endroit ou le 
stocker, l'endroit oil se trouve le point d'insertion, quelle est la zone selectionnee, etc. 
A chaque ligne est assoeiee une structure de donnees gerees par Line Edit, qui 
contient tous ces renseignements. Contrairement a I'habitude, nous allons definir le 
contenu exact de la structure, en gardant bien present a 1'esprit qu'il est interdit d'aller 
modifier directement I'un des champs sans passer par une routine appropriee. 
Certains champs n'etant pas accessibles au travers de routines, ii sera parfois 
n^cessaire d'aller les lire directement ! 

struct _LERec{ 

Hand le TaxtHandla ; /* handle sur ta ligne de texte Editable */ 

int Length : f longueur courante en caracte, es */ 

int MaxLength ; r nombre maximal de caracteres autorises 7 

Rect DeslRect ; f rectangle de destination */ 

Rect ViawRact ; f rectangle da visualisation */ 

Pointer PortPtr ; f pointeur sur le grafport definissant lenvironnement 7 

int LineHite ; I" hauteur du rectangle a inverser si selection 7 

int BaseHita ; /• position verticals du texte dans le rectangle de destination 7 

int SelSlart ; f d^but de la selection 7 

int SelEnd ; /* fin de Ja selection 7 

int ActFtg ; /* usage interne a Line Edit 7 

int CarAct : t usage interne k Line Edit*/ 

int CatOn ; /* usage interne a Une Edit 7 

long CarTima ; r usage interne a Line Edit 7 

Pointer HilitaHook ; /' pointeur sur la routine de mise en lumiere */ 

Pointer CaretHook ; /* pointeur sur la routine de dessin du curseur d'insertion 7 

\: 

#define LERec struct LERec 

Nous allons decrire certains de ces champs, ceux qui interviendront dans les 
manipulations de base du manager. Notons immediatement qu'une telle structure est 
reperee par un handle, alloue par Line Edit a sa creation. 

• Tout affichage de texte suppose un environnement graphique complet, e'est-a- 
dire un grafport. Ce sont les caracteristiques du grafport qui serviront a l'affichage du 
texte (police de caracteres, couleurs et style notamment), et done la structure assoeiee 
a une ligne gardera trace d'un pointeur (PortPtr) sur le grafport a utiliser. 

• Dans ce grafport, deux rectangles seront dSfinis (coordonn^es locales) : un 
rectangle de destination, dans lequel le texte sera dessine (DeslRect), et un rectangle 
de visualisation, dans lequel le texte sera visible (ViewRect). Puisque nous travaillons 
dans un grafport, qui possede une clip region et une region visible, nous constatons 
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que Line Edit n'affichera du texte visible qu'a 1'intersection de ces quatre rectangles 
ou regions. Souvent, ces deux rectangles seront egaux (ou ViewRect sera l£gerement 
plus grand que DestRect). C'est le rectangle ViewRect qui fixe les frontieres de 
1'activite de la souris sur une ligne. Dans I'exemple de fin de chapitre, nous avons fait 
ce rectangle volontairement trop haut, et nous voyons a ['execution que ce n'est pas 
d'un effet tres heureux pour un utilisateur ! 











Ligne ent i erement visible 






r^ 


rectangle de 
visualisation 


j/j^rjfe part ie 1 1 ement viylr^y^' 


\ ! I 

' destination 



Figure VIU.l. Rectangles de destination it de visualisation. 

C'est principalement pour pouvoir acc^der au rectangle ViewRect que nous avons 
donne la definition de la structure LERec. Pour respecter 1'interface utilisateur, il 
serait souhaitable que le pointeur change de forme des qu'il passe au-dessus d'un teste 
editable, et prenne la forme d'une poutre en I (I-beam). II faut done tester 
1'appartenance du point survole par le pointeur au rectangle ViewRect de chaque ligne 
Editable presente a 1'ecran ! 




Figure VIII. 2. Le curseur en forme de poutre. 

Supposons que la variable LEHdl soit un handle reperant une ligne Editable, tel 
qu'il a 6te retourne par la fonction LENew (voir la section suivante). Pour obtenir le 
rectangle de visualisation defini pour cette ligne, on ecrira en C : 



LERac "LEHdl; 
Ract r; 



f LEHdl est declare handle sur structure LERec 'I 
r r est un rectangle */ 



r = (*LEHdl)-> ViewRect ; /* rectangle de visualisation d'une ligne editable V 
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Hands LEHdl; 
Fleet r; 



I* LEHdl estdeclard handle sans particularite 7 
/* r est un rectangle */ 



r > (*(LEflec") LEHdl)->l/<eivflecf; /• rectangle de visualisation d'une ligne editable 7 

et si pt est un point ddfini en coordonnees globales (et qu'on doit done convertir en 
coordonnees locales du grafport definissant renvironnement de la ligne reperSe par 
LEHdl), Tappartenance de ce point au rectangle de visualisation sera testee de la 
maniere suivante : 

SetPort((*LEHdl)->PcrtPtr); r utjte si le grafport est susceptible d'avoir change 7 

GlobalToLocalf&pt); f conversion 7 

if (PtlnRect(&pt, &('LEHd\y>ViawRsctj) ... r test d'appartenance */ 

ou bien : 



SetPort((*(L£flec **) LEHdl)->PortPfr); 

GlobalToLocal(&p1); 

if (PtlnRect(&pl. S(*(L£flec ") LEHdl)-> ViewRectj) . 



Et encore ! ce n'est pas aussi simple, puisque cette construction suppose que 
LEHdl est connu. Quand une fenetre contient plusieurs lignes editables, il appartient 
a 1'application de determiner sur laquelle l'utilisateur promene le pointeur et peut etre 
amene a cliquer ! C'est ce genre de tests qui rendent tres difficile 1'ecriture d'un 
editeur tout simple sur 1'Apple IIGS, inflniment plus difficile qu'avec le manager 
TextEdit sur Macintosh. 

* Le texte lui-meme ne fait pas partie de la structure, mais est reperg au moyen 
d^un handle (TextHandle). C'est ce handle qui est memorise' par Line Edit. Un texte 
nest ni une chaine de type Pascal, ni une chaine de type C, mais une suite quelconque 
de caracteres. A ce texte sont associees deux valeurs, son nombre de caracteres 
courant (Length) et le nombre maximal de caracteres qu'il est autorise a poss^der 
(MaxLength), 

• Pour placer le texte dans le rectangle de destination, pour assurer 1'inversion 
graphique lors d'une selection de texte, Line Edit a besoin de deux renseignements : 
ou faut-il placer le crayon par rapport au sommet de ce rectangle pour ecrire le texte 
(BaseHite), et quelle sera la hauteur de la zone a inverser (LineHite). Ces deux 
Elements dependent de la police de caracteres utilised, et devront etre recalcules si 
celle-ci est modifiee. Ces deux champs obeiront aux regies suivantes : 



BaseHite - leading + ascent 

LineHite = leading + ascent + descent 



sommet de 
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Figure VIII.3. Position du tute dans It rectangle de destination. 

• Pour garder trace de la partie de texte selectionnee ou de la position du point 
d'insertion, Line Edit utilise deux entiers, SelStart et SelEnd. Dans ces entiers sont 
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memorisees des positions de caracteres. II taut voir une position dc caracteres comme 
un index an travers du texte, la position de'signant la gauche du premier caractere, la 
position 1 la gauche du deuxieme caractere, etc, Un point d'insertion en position 4 
signifie qu'il est situe entre le quatrieme et le cinquieme caractere de la ligne Editable. 



zone saiaMionnee 



1 2 3 4 5 6 78 9 10 II 12 131415 16 17 



point d'insertion 



Figure VIII ,4, /one selectionnee du point d "insertion. 

SelStart et SetEnd memorisent les positions de d£but et de fin de la selection. Si ces 
nombres sont differents, il y a effectivement une selection de texte (la difference entre 
les deux donne le nombre de caracteres selectionnes) et Line Edit inverse le rectangle 
correspondant a cette selection, en utilisant LineHite comme hauteur et en faisant la 
somme des largeurs des caracteres pour obtenir la largeur totale du rectangle. II s'agit 
re"ellement d'une inversion au sens QuickDraw du terme, et non d'un echange entre 
les couleurs de premier plan et de fond (cette subtilite n'est visible qu'en cas 
d' utilisation de couleurs autres que le noir et blanc). 

St ces nombres sont egaux, i! n'y a pas de selection de texte : la position designee 
sera done celle du point d'insertion, par deiaut une barre clignotante de hauteur egale 
a LineHite, 



Vision d'ensemble des routines 

On commencera par initialiser Line Edit, comme tout autre outil, avant d'utiliser 
les routines que nous offre ce manager. Pour creer une ligne editable et allouer un 
handle sur cette ligne, on appellera LENew. Une fois qu'on n'aura plus besoin de cette 
ligne, on fera de la place avec LE Dispose. Une routine devra etre appel£e 
r^gulierement pour assurer le clignotement du point d'insertion, LEIdle. 

Pour rdpondre a un evenement de type MouseDown dans le rectangle dc 
visualisation d'une ligne Editable, on utilisera LEClick. Pour repondre a un evenement 
de type Key Down ou Auto Key, on appellera LEKey. Pour assurer le couper-copier- 
coller, il existe LECut, LECopy et LEPaste. Pour insurer du texte, on pourra utiliser 
LEInsert, et LEDElete pour effacer du texte. Ces deux routines ne touchent pas au 
presse-papiers et peuvent former les bases d'implantation d'une comrnande Annuler. 

Pour transferer les informations copiees entre le presse-papiers prive" de Line Edit 
et le presse-papiers public ge>e par le Scrap Manager, on utilisera LEFromScrap et 
LEToScrap. 

En reponse a un evenement de type UpdateEvt, il faudra appeler LEUpdate. En 
reponse a un evinement de type ActivateEvt, il faudra utiliser LEActivate ou 
LEDeactivate. 

Pour forcer le contenu d'une ligne Editable, on appellera LESetText Pour forcer 
une selection de texte, on utilisera LESelSelect 
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Enfln, pour dessiner un texte (eventuellement plus long que 256 caracteres) sans 
possibility d'fidition, il faudra se servir de LETexIBox. 

Nous allons maintenant detainer ces routines, en etudiant leur syntaxe et leur 
utilisation exacte. 



EXEMPLES D'UTILISATION 

Initialisation et creation de lignes editables 



Rect dest, view; r les deux rectangles 7 

HancSe hl_1 ; /* handle sur ligne editable */ 

r initialisations pr6c6dentes 7 
LEStartUp(mylD, zeropg); f initialisation de Line Edit 7 

r suite des initialisations 7 

SetFort( ...J; f on se place sur le grafport voulu 7 

SotRoct(&dest, 4. 4. 200, 15); f rectangle de destination {coordonnees locales) */ 

view - dest; P recopie dans le rectangle de visualisation... 7 

lnsetRect(4view, -2, -2); I* ...qui est legerernent agrandi 7 

hL1 = LENew(&dest, Sview, 30); f creation d'une ligne Editable: 30 caracteres au plus 7 



Tout appel a une routine de Line Edit doit etre precede de Initialisation du 
manager. C'est I.EStartUp qui s'en charge. Deux arguments : Hdentifiant de 
I'applieation et I'adresse d'une page zero, dont Line Edit a besoin pour fonctionner. 
(Voir le chapitre XII pour une vision d'ensemble des initialisations). LEStartUp 
s'alloue de maniere interne un handle qui reperera son presse-papiers priv£, vide a 
J'initia ligation. 

Pour ereer une ligne editable, on appelle la fonction LENew. On donne trois 
arguments : un pointeur designant le rectangle de destination, un pointeur designant 
le rectangle de visualisation et un entier contenant le nombre maximal de caracteres 
autorises dans la ligne (compris entre 1 et 256), La fonction retourne un handle (sur 
une structure LERec) qui permettra de designer la ligne editable dans toutes les 
manipulations futures. Les rectangles sont donnes en coordonnees locales du grafport 
d'appartenance, c'est-a-dire le grafport courant au moment de I'appel (ce grafport 
sera generalement le port associe a une fenetre). Le rectangle de visualisation ne doit 
pas etre vide. Pour rendre le texte completement invisible, il suffit que l'intersection 
entre les rectangles de destination et de visualisation soit vide. 

Attention, LENew ne provoque pas 1'appaiition du curseur clignotant (voir le 
paragraphe suivant sur le point d'insertion). LENew alloue un handle qui reperera le 
texte de la ligne, vide a la creation (les champs SelStart et SelEnd sont done forcemem 

nuls). 

Le handle reperant une ligne editable sera validc jusqu'a ce que la procedure 
LEDispose soit appelee. On precise ce handle en argument. La place occupee en 
memoire par la structure LERec et par le texte que la ligne contenait est liberee. 

Pour affecter du texte a la ligne editable et remplacer celui qui aurait pu s'y trouver 
deja, on fait appel a la procedure LESetText, qui reclame trois arguments : un 
pointeur sur le texte a incorporer, le nombre de caracteres de ce texte et le handle sur 
la ligne editable ou le texte doit etre affecte. Le point d'insertion sera fixe apres le 
dernier caractere du texte, St le nombre de caracteres depasse le maximum autorise 
pour la ligne, le texte sera tronque. 
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Cette procedure n'affecte absolument pas ce qui est affiche a I'ecran : il faut forcer 
[e dessin du nouveau texte. La mdthode correcte est la suivante : on declare invalide le 
rectangle de visualisation par InvalRect, ce qui va provoquer un evenement de raise a 
jour de la fenetre, et on repond a cet evenement par un appel a LEUpdate. 



Point d' insertion, texte selectionne 

Nous avons dit que I'appel a LENew ne provoque pas ['apparition du curseur 
clignotant. Supposons que nous voulions cr£er plusieurs fenetres possSdant chacune 
plusieurs lignes £ditables. II serait assez inopportun de voir plusieurs points d'insertion 
clignoter en m&me temps, ou plusieurs zones selectionnSes en divers lieux de I'ecran ! 
La regie est qu'il n'y a qu'un point d'insertion ou zone s£!ectionnee, et que ce point ou 
cette zone appartient obligatoirement a la fenetre active. I) est de la responsabilite de 
l'application de garder trace de la ligne active ainsi deiinie. 

• Pour faire clignoter le point d'insertion ou invefser la zone selectionnee dans une 
ligne editable, on fera appel a la procedure LEActivate (en donnant comme argument 
le handle sur la ligne visee). On aura pris soin juste avant de rendre son £tat normal & 
la pr£c£dente ligne selectionnee, en appelant la procedure LEDeactivate (meme type 
d'argument), 

Un lieu privilegie pour placer ces procedures est evidemment la reponse aux 
evenements deactivation. Sans se poser la moindre question, on appelle LEDeactivate 
quand une fenStre est desactivee, ou LEActivate quand elle est activee. Cela sc 
complique des qu'une fenetre contient plus d'une ligne editable : ces procedures 
doivent £tre appelees des qu'un clic souris intervient dans une ligne editable diffe'rente 
de la ligne active ! 

• Pour repondre au clic souris, on appellera la procedure LECIick, a condition que 
la fenetre soit active (sinon on active la fenetre, comme d'habitude). Deux 
arguments : un pointeur sur I'evenement a trailer et un handle sur la ligne ou le clic a 
eu lieu. 

Voici une sequence d 'ins (ructions typique pour repondre a un Mouse Down qui a 
eu lieu dans la region content) d'une fenetre contenant des lignes editables {1'exemple 
assume qu'il n'y en a que deux) : 

TaskRec tache; f I'evenement auquel il faut repondre */ 

Handle hLE; f handle sur la ligne courante 7 

Handle hL1 , hL2; F les deux lignes drifinies */ 

Pointer wind: /* pointeur sur la fenetre active */ 

case wlnContent : 

if {wind != FrontWindow( )) S«lectWlnd»w(wind}; 
else 

( 

long pi; f paint qu'on va converU'r eft coordonndes locales */ 

pt - tache. where ; /* ii est en eooixlonneos globales */ 

GlobalToLocB!(&pt); I' il est convert! V 

LEDeactlvatefhLE); f la tigno courante est desactivee V 

.■■* on va determiner duns quelle ligne I'utilisateur a clique V 

il (PilnHBCt(4pt, &{'(LEHec") hL1 )-> Wotvflecf)) hLE - hL1 ; 

else if (PtlrtR»ct(&pt. &C(LERec") hL2)->ViewRect)) hLE - hL2; 

LEActivate(hLE); f on active la nouveile ligne courante... */ 

LECIIck(&tache. hLE); f . . .et on laisse Line Edit se d6brouiller */ 

) 
break; 



Ouand LECIick est appele, I'ecran est propre, et la ligne est propre. Toute 
manipulation de I'utilisateur sera traduite sur la ligne : defacement du point 
d'insertion, extension de la selection, etc. Si le travail preparatoire n'avait pas £te 
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accompli, on pourrait se retrouver avec plusieurs zones selectionnees. En effet, 
LEClkk ne sait agir que sur une ligne, ignorant totalement l'etat des autres. 

• Pour que le curseur clignote dans le cas d'un point d'insertion, il est necessaire 
d'appeler la procedure LEIdle periodiquement, disons au moins une fois dans la 
boucle d'evenement, avant GetNextE vent . On donnera en argument le handle sur la 
ligne courante. On pourra se passer d'appeler LEIdle si la fenetre active ne contient 
pas de ligne editable. 

• L'application peut forcer dans une ligne editable la position du point d'insertion 
ou la zone selectionnee, grace a la procedure LESet Select. Trois arguments : un entier 
dormant la nouvelle position de debut de selection, un entier donnant la nouvelle 
position de fin de selection, et le handle designant la ligne. De maniere evidente, les 
deux premiers arguments doivent etre eompris entre et 256, et le premier argument 
doit etre infeneur ou egal au second. S'ils sont egaux, la selection est vide, et la 
position designe ators le point d'insertion. On constate que cette procedure assure la 
modification directe des champs SelStart et SelEnd de la structure LERec. L'effet a 
I'ecran est immediat. 



Edition de lignes 

Nous venons de voir comment positionner un point d'insertion ou faire une 
selection. Des que 1'utilisateur va se servir de son clavier, il va d&ruire la selection et 
inserer des caracteres, II peut aussi invoquer le menu Edition, choisir Couper pour 
effacer la selection et la transferer dans le presse-papiers, choisir Copier pour 
transferer la selection dans le presse-papiers sans 1'effacer, choisir Coller pour 
remplacer la selection par le contenu du presse-papiers ou I'inserer a 1'endroit du 
curseur clignotant, ou choisir Effacer (sans affecter le presse-papiers). Notons que 
dans le cas d'insertion de texte, si le nombre de caracteres courant atteint le nombre 
maximal autorise, ce seront les caracteres les plus a droite qui seront perdus. 

• Des que 1'utilisateur a enfonce" une touche alors qu'il existe une ligne editable 
courante, l'application appelle LEKey avec trois arguments : le code ASCII du 
caractere (dans un entier), le champ modifiers tel qu'il est retoume par I'Event 
Manager et le handle sur la ligne editable courante. 

LEKey remplace la selection par le caractere entre ou insere le caractere s'il n'y 
avait pas de selection, et positionne le point d'insertion juste derriere. Elle gere 
eompletement les caracteres speciaux, tels la touche d'effacement. les fleches gauche 
et droite, les caracteres Controle-F, Contr61e-X et Contrdle-Y, et la touche Clear 
(equivalente a Controle-X). LEKey redessine le texte imm£diatement. 

Tout serait parfait si cette procedure ne presentait pas le deiaut de laisser a 
l'application un certain nombre de manipulations. Dans la mesure ou elle ne flltre 
absolument rien, c'est a l'application de verifier si par exemple la touche Pomme etait 
enfoncee, et d'agir en consequence : la touche Pomme etait associee a une fleche 
(droite ou gauche), c'est LEKey qu'il faut appeler pour deplacer le point d'insertion en 
bout de ligne, sinon c'est sans doute un equivalent-clavier de menu deroulant, et il faut 
appeler MenuKey. De la meme maniere, les caracteres optionnels ne sont pas g£res. 
Ouand la touche Option est enfoncee, il faut forcer a un le bit 7 du code ASCII pour 
obtemr les caracteres internationaux. Enfin, on peut juger indesirables les caracteres 
de contr61e, obtenus quand la touche Contr61e est enfoncee. C'est a l'application a en 
faire le tri : certains de ces caracteres sont imprimables, et il serait dommage de s'en 
priver ; d'autres sont vraiment speciaux, et pourraient s'averer perturbants. A litre 
d exemple, savez-vous comment on obtient le caractere « € » sur un clavier QWER- 
TY 7 En faisant Con trole -Option -n, et a condition de forcer a un le bit 7... Nous 
verrons un exemple de filtrage en fin de chapitre. II n'est pas parfait, mais satisfait aux 
regies de 1'interface utilisateur. Les caracteres de contr61e ne sont pas filtres. 
Rappelons qu'a la fin du Chapitre IV sur ['Event Manager, 1'exemple permet de voir 
le code ASCII de n'importe quelle combinaison de touches, caracteres optionnels 
eompris. Ce peut etre un element de reflexion pour I'ecriture d'un flltre parfait. 
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Figure VIII .5. Le menu standard d "edition. 

• Pour repondre a la commande Couper, il suffit d'appeler la procedure LECut en 
predsant en argument la ligne editable concerns. Le contenu de la selection est place 
dans le presse-papiers prive de Line Edit, ecrasant ce qui s'y trouvait. La selection est 
effaced et la ligne redessine'e. Si la selection dtait vide (presence d'un point 
d'insertion), le presse-papiers est vide, 

• Pour repondre a la commande Copier, il suffit d'appeler la procedure LECopy en 
predsant en argument la ligne editable concernee. Le contenu de la selection est place 
dans le presse-papiers prive de Line Edit, ecrasant ce qui s'y trouvait. Si la selection 
etait vide (presence d'un point d'insertion), le presse-papiers est vide. 

• Pour repondre a la commande Coller, il suffit d'appeler la procedure LEPaste en 
predsant en argument la ligne editable concernee. Le contenu du presse-papiers prive 
de Line Edit (mdme vide) vient remplacer la selection en cours et le point d'insertion 
est positionne juste derriere le texte ainsi insere. S'il n'y avait pas de selection, il y a 
juste insertion de texte. Le contenu du presse-papiers reste inchange. Si necessaire, la 
ligne est redessinee. 

• Pour repondre a la commande Effacer, il suffit d'appeler la procedure LEDelete 
en predsant en argument la ligne editable concernee. La selection, si elle existe, est 
effacee, mais n'est pas transferee dans le presse-papiers, et la ligne est redessinee. S'il 
n'y a pas de selection, il ne se passe rien. 

• En addition a ces procedures, notons 1'existence de LElnsert, qui permet 
d'inserer du texte juste devant la selection ou devant le point d'insertion. On lui passe 
trois arguments : un pointeur sur le texte a insurer, le nombre de caracteres a inserer 
et la ligne editable concernee. Ni la selection ni le presse-papiers ne sent modifies par 
cette procedure. 

Pour mettre en reuvre une commande Annuler, il faut commencer par se fixer 
certaines regies : que doit-on annuler ? On pourra memoriser I'etat d'une ligne au 
moment de son activation, et considerer Tannulation comme la restauration de cette 
ligne tant qu'une autre ligne n'est pas activee. Ou alors memoriser son etat avant une 
commande, pour pouvoir annuler les effets de cette commande. Ou encore memoriser 
une sequence de caracteres saisis, pour les annuler d'un coup (dans ce cas il serait bien 
de retablir la selection eventuellement ecrasee par la saisie du premier caractere de la 
sequence). Et on n'oubliera pas de laisser la possibilite a 1'utilisateur d* annuler son 
annulation ! 



Affichage de lignes editables 
et de texte non editable 



• Cas des lignes editables 

Nous avons vu que la procedure LESetText ne redessine pas le contenu de la ligne 
editable , et qu'il faut rendre invalide son rectangle de visualisation pour provoquer un 
evenement d'activation. Dans la reponse a cet evenement, on appelle LEUpdate. avec 
comme argument le handle sur la ligne ii redessiner. 
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Quand une ligne editable est dessinee a 1'ecran, elle utilise les caracteristiques du 
grafport dont elie garde trace dans la structure LERec qui 1'identifie, En particulier, la 
police de caracteres, la taille, le style et les couleurs (fond et premier plan) utilises sont 
ceux de ce grafport. On peut imaginer conserver autant de grafports difterents qu'il y a 
de lignes editable*, chacune presentant ses propres caracteristiques. Ce serait un peu 
lourd ! II vaiit certainement mieux memoriser ces caracteristiques au niveau de chaque 
ligne, et utiliser un grafport unique dont on modifiera les champs juste avant d'appeler 
LEllpdate. 

Attention, si on modifie les caracteristiques d*un grafport, aucun effet visible ne se 
repercute a 1'ecran, puisque Line Edit n'a aucun moyen de savoir ce qui s'est passe. II 
faut done la encore rendre invalide le rectangle de visualisation des lignes concernees 
par la modification, et appeler LEUpdate. 

LEUpdate sera appele' classiquement entre les procedures BeginUpdate et EndUp- 
date. Juste avant 1'appel, s'il concerne la ligne active, on prendra soin d'effacer 
completement son rectangle de visualisation, pour eviter de laisser aecidentellement a 
1'ecran le fantome du point d'insertion quand la fenetre est desactivee. 

Reprenons notre exemple precedent oil nous avians deux lignes editables dans une 
fenetre. La reponse aux evenements de mise a jour pourrait avoir Failure suivante : 

long port: 

Pointer precport; 

Handle hLE.hL1,hL2; f hLE designs la ligne active 7 

int style 1 , style2: f styles dans iosqueis les lignes sont dessine es 7 

case UpdaleEvt : 

port = tacne. message : 

precPort = GetPert( ); T on memorise le grafport courant 7 

SetPort(port) ; f on fixe le grafport <te la fenetre a niettre a jour 7 

BeginUpdate(port); 

EraseReet(&(*(LERec ")hl £)->Vit.wRuct); r on ettaim le rectangle de la ligne active 7 

SetTextFac»{sty!e1 ) ; f le styla a et6 determine par atlleufs V 

LEUpdate(hL1 ) ; P d«ssin de la premiere ligne 7 

SetTextFace(styls2}; I' la style a ate determine pai ailleurs 7 

LEUpdat*{riL2); f dessin de (a detixiome ligne 7 

EndUpdate{port): 

SetPort(precPort): f on retablit le grafport precedent 7 

break; 



• Cas du texte non Editable 

Nous n'en avions pas parle jusqu'a present, et nous n'en parlerons plus par la suite. 
En effet, le texte non editable est gere par une seule procedure, LETextBox. Quatre 
arguments : un pointeur sur le texte i afficher, un entier donnant le nombre de 
caracteres du texte, un pointeur sur le rectangle (coordonnees locales) dans lequel le 
texte viendra s'afficher et un entier precisant la justification du texte a i'interieur du 
rectangle (0 signifie justification a gauche, - 1 justification a droitc et 1 texte centre). 

LETextBox commence par efface r le rectangle specif ie, puis dessine le texte a 
I'interieur. Le rectangle agit comme une clip region, dans le sens ou le texte ne pourra 
pas ddborder du rectangle. Les lignes de texte sont definies par 1'insertion de 
caracteres Retour (code ASCII 13 decimal) au milieu des caracteres editables. 
Excepte la justification, aucune tentative de mise en page n'est effeetuee : si une ligne 
depasse la largeur du rectangle, une de ses extremes (voire les deux) ne sera pas 
visible, un point e'est tout. Aucun passage a la ligne suivante ne se fait automatique- 
ment. 

Le texte est limite a 32 737 caracteres. II est dessine avec les caracteristiques du 
grafport courant. Pour ce faire, Line Edit cree une structure provisoire et lactase 
immediatement apres. C'est pourquoi un tel texte n'est pas editable ; Line Edit n'en 
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garde pas une copie. C'est pourquoi aussi on aura tout interet a appeler cette 
procedure en reponse a un evenement de mise a jour (voir 1'exemple en fin de 
chapitre). 



Manipulation de presse-papiers 

• Le Scrap Manager (voir chapitre X) gere un presse-papiers grace auquel les 
applications et/ou les accessoires de bureau peuvent s'^changer des donnees, donnees 
de tons types. Line Edit gere un presse-papiers qui lui est propre. et qui ne peut 
contenir autre chose que du texte, II arrive souvent que deux applications, ou une 
application et un accessoire de bureau, veuillent s'e changer du texte copiS par 
1'intermediaire de Line Edit, Cela n'est possible que si le contcnu des deux presse- 
papiers peuvent etre echanges. 

Line Edit offre deux procedures pour ces echanges, LEFromScrap copie le contenu 
du presse-papiers public dans son propre presse-papiers, LEToScrap fait exactement 
1'inverse, Si une application veut gerer convenablement le copier-culler d'informations 
de type texte, elie veillera a appeler ces procedures a bon escient, notamment a son 
demarrage ou apres reactivation (elle verifiera si le presse-papiers public contient du 
texte, laisse la par I'application precedente ou par 1'accessoire de bureau r^cemment 
appele, et en fera eventuellement le transfert), et dans I'autre sens au moment d'une 
deactivation ou de quitter (1'accessoire appele ou I'application suivante peuvent 
vouloir recevoir le texte copie, done le transfert vers le presse-papiers public est 
indispensable). 

• LKScrapHandle esl une fonction sans argument qui retourne un handle SUM le 
presse-papiers prive de Line Edit. De la sorte, on peut merne s'amuser a editer le 
presse-papiers ! 

• LEGetScrapLen est une fonction sans argument qui retourne dans un entier la 
taille en octets du presse-papiers prive de Line Edit. Cette taille doit etre vue comme 
une limite superieure au nombre de caracteres memorises, et non le nombre exact. On 
peut changer la taille maximale du presse-papiers en passant un entier compris entre 
et 256 a la procedure LESetScrapLen. 

Remarque Le presse-papiers de Line Edit est limite a 256 octets, pas le presse- 
papiers public. Si une tentative de copie de plus de 256 caracteres est effectuee par 
1'intermediaire de LEFromScrap, une erreur sera re to urn ee dans -errno, de code 
$1404 (presse-papiers trop gros pour etre copi£). 



Exemple complet 

Exemple complet, mais modeste. Modeste, parce qu'il ne manipule qu'une seule 
ligne editable, et un seul texte non editable sur plusieurs lignes. Notre but n'etant pas 
d'ecrire un editeur de programme, nous nous sommes limites a la simplicity. Le fait 
que Line Edit gere des lignes et soit incapable de passer auto m at iqu erne nt a la ligne 
suivante restreint singulierement son utilisation ! Sur Macintosh, Text Edit sail editer 
plusieurs lignes d'un coup et assurer une certaine mise en page (gestion de texte, et non 
de ligne). Aussi a-t-on vu fleurir de magnifiques exemples d'ecliteurs, dans tous les 
livres, dans tous les environ nements de developpement, quel que soit le langage. La 
mise en ceuvre etait si simple ! Gageons que ce ne sera pas le cas avec Line Edit sur 
1'Apple IIGS, en tout cas les editeurs « simples » auront des fonctionnalites extreme- 
ment limitees. Par contre. Line Edit est parfait comme outil pour le Dialog Manager, 
dont nous allons parler dans le chapitre suivant, et nous n'avons pas voulu ici faire de 
maniere compliquee ce que le Dialog Manager permet de faire de maniere plus 
simple. 

L'exemple passe en revue la plupart des appels de Line Edit sur une simple ligne 
editable ! Totites les manipulations sont Dermises sur cette ligne, sauf la commande 
Annuler et le passage de texte aux accessoires de bureau, non pas que nous trouvons 
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cela difficile a faire, mais parce qu'il n'existe au moment ou nous ecrivons ces lignes 
aucun accessoire de bureau susceptible de recevoir du texte, et qu'il est done 
impossible de tester des exemples plus complets ! 

Le rectangle de visualisation est dessine, et le pointeur est gere de telle sorte qu'il 
prend la forme d'une poutre en I des qu'il passe au-dessus de cette zone editable. 

En addition a la ligne Editable, un texte non editable est affiche, et grace a un menu 
deroulant, on peut modifier sa justification. 

Pour manipuler plus d'une ligne editable par fenetre, il suffira de combiner (tres 
simplement) les morceaux d'exemples vus plus haul avec 1'exemple complet vu id. On 
pourra ainsi monter les elements d'un 6diteur pleine page, en definissant autant de 
handles qu'il y a de lignes. A vous de gerer les caracteres Retour pour passer d'une 
ligne a l'autre, et, beaucoup plus complique\ la possibilite de selectionner du texte sur 
plus d'une ligne, ce qui est tout de meme la moindre des choses sur un 6diteur pleine 
page ! 



«fc Fichier Edition Justification 



;!:;; 



;:;;!; 



Edition 



Ceci est le texte par EHjLUUT 



Ceci est un texte 
beaucoup plus long, 

et non editable, 

qui sert a illustrer 

la procedure LETextBox. 

3 justifications sont possibles: 

a gauche, d droite et centree. 

Vous pouvez la changer 

grace o un menu deroulant. 



Figure VIII. 6. L'tcran de 1'excmpte. 



#include <tools.ft> 
#include <sntete.h> 



r definition des termes en gras */ 
r definition des termes en italique ' 



#define mode 



r si mode 320, 1 si mode 640 7 



char Menu1[] . 
char Menuflj] • 
char Menu 19[] = 
charMenu2(] - 
char Menu21 [ ] ■ 
char Menu29[ ] < 
charMenu3[] - 
char Menu31[] = 
char Menu32( ] = 
char Menu33[ j ■ 
char Menu34[ ] ■ 
char Menu35[ ] . 
char Menu39[ ] = 
char Menu4[ ) - 
char Menu41 [ ] . 
char Menu42[ ] = 



>@\\XNr; 

'- A propos d'ediSon. . .WN257VD" 

•> Fichier \\N2"; 

"- Quttar\MM260*Qq"; 

•> Edition WN3-: 
"- Annuler\\N2S0V2z"; 
■■ Coupe rWJ2SrXx"; 
"- Copier\\N252*Cc': 
■■ Coller\\N2S3*W: 
"- Effacer\\N254"; 

*> Justification \\N4"; 

"- Gauche\\N271*GgC\22-; 
"- Droite\\N270*Dd"; 



236 I BOlTE A OUTILS DE L'APPLE IIGS 



char Menu43[ ] = 


■ Cent 


char Menu49[ ] ■ 


■*1 


#define iQuitter 


260 


#define iAnnuler 


250 


sideline iCouper 


251 


#define iCopier 


252 


Sdefine iColler 


253 


fldefine iEf facer 


254 


sdefine iGauche 


271 


#define i Droits 


270 


#define i Centre 


272 



Centree\\N272*Mm" 



int colfenf ] = (0,OxOFOO,Ox020F,OxFOFQ.OxOOFO); f couleurs des (enetres 7 

Param/is(maFen = { 

sizeof{ParamUs!}, 0x8080, "M 1 Edition ", OL, ' 

(0, 0, O, 0}, colfen, 0, 0, 

O, 0, 0, 0, 

0, 0, 0, 0, 

OL, 0, OL, OL, OL, 

{40,20,180. 300+320'mcde), -1 L, OL }; 

r curseur en forme de poutre (models de definition libre) 7 
char IBeam[ ] . ( 10,0,3,0, r 10 lignes de 3 mots V 

0xFF,Q,Ox0F,0xFO,O,0, /* image 7 

0,0xF0,0xF0,0,0.O, 
O.OxOF.0, 0,0,0, 
0,OxOF,0,0,0,0, 
O.OxOF, 0,0,0,0, 
O.OxOF,0,0,0,0, 
Q,OxOF,0,0,0,0, 
0,OxOF,0. 0,0,0, 
O.OxFO.OxFO ,0,0,0, 
OxFF,0,OxOF,OxFO,0,0, 
0,0,0,0,0,0, /* masque 7 

o,o,o,o,o,n, 
o,o,o.o.c,o. 

0,0,0,0,0,0, 
0,0,0, C,0,L, 
0,0,0,0.0,0. 
0,0,0.0.0,0, 
0,0,0,0,0,0, 
0,0,0,0.0.0, 
0.0,0,0,0,0, 
5,0,3,0 J; r point chaud 7 

char texte[ \ - "Ceci est le texte par defaut, defaut invert"; 

char text1[ ] = "Ceci est un texte\15beaucoup plus long,\15et non editable.YISqui sen a 
il!ustrer\15la procedure LETextBox.\0153 justifications sont possibles:\1 54 gauche, a droits et 
contree.M SVous pouvez la changerM5grace a un menu deVoulant"; 

TaskRec tache; r ce que manipule GetNextEvent 7 

Pointer fen; /* pointeur sur fenetre 7 

int indie = TRUE; r indicateur de f n de boucle 7 

Pointer wind; f | a fenetre courante 7 

Handle hLE; r la ligne Editable courante 7 

Rect rD V = { 1 ,4*{mode+ 1 ) , 30,276+3 1 67node} ; /" rectangle de destination e t de visu 7 

Red box . {40 , 1 5+4 0* mode , 1 25 ,26 S +40* mode} ; r recta ngle pour le lex te a af ficher 7 

int justif = 0; r justification active 7 

Pointer arrow; r curseur en forme de fleche 7 

/***** PROGRAMME PRINCIPAL — 7 
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main( ) 
mylD; 



mylD = debut_appl{mods): 

PlacsMenusf ); 

fen = NswWindow(SmaFen); 

SetPort(fen); 

hLE = LENew(SrDV, SrDV, 30+50*mode); r creation d'une ligne Editable. . . 7 



F identifiant de I'application */ 

/* initialisations V 

r installs la barre des menus 7 

r ouverturs de la fenstre {invisible) 7 

r grafport sur lequel on va travail le r 7 



LESetTextftexte, 44, hLE): 
LESet5elect(22, 28, hLE); 
Show Wi ndow(fen) ; 
Flush Even t&{Every Even t. 0); 
arrow = GetCursorAdr( ); 



.oil on metdu texte pardefaut.. 

,et oil on selectionne un mot par defaut 7 
r fenetre maintenant visible 7 
T menage dans la file d'evenements 7 
T on garde ladresse du curseur fl&che 7 



do { 



r pour les accessoires de bureau perbdiques 7 

r pour le clignotement du point d'insertion 7 
T ajuste le dessin du curseur 7 



System Task! ) ; 

LEIdle(hLE); 

AjusieCurs( ); 

if(!GetNextEvent(fveryfvenf, itache)) continue; 

switch(tac he . wha f) /* quel eveVie me nt? 7 

{ 
case MoussDown : 

sou risDans( Find WIndow(&wind, tache.wAera)); f reponse a un die souris 7 

break; 



case KeyDown : 
case AutoKey : 

clavierf ); 
break; 

case UpdateEvt : 

maj Fen(tache . message) ; 
break; 

case ActivateEvt : 

actFe n( tac he . message) ; 
break; 



r rriponse aux 6v6nements de type clavier 7 



r reponse a un evenementde mise a jour 7 



r reponse a un evenement d'activation 7 



while(indic) ; 
quitter(mylD); 



r fin de I'application */ 



/*"" FONCTION PLACEMENUS: installs la barre des menus ' 

PlacsMenus( ) 



lr)sertMenu(NewMsnu(Ueriu4), 0) 
lnsertMenu(NewMenu(Mer\u3), 0) 
lnsertMenu(NewMenu(Menu2), 0) 
lnsertMenu(NewMenu(Menu1), 0) 
FixAppleMenuM) 
FixMenuBar( ); 
DrswMenuBarf ): 



/•"" FONCTION EXECMENU: re pond au choix d'un article de menu ' 
int ExecMenufart, menu) /* retourne FALSE si quitter est choisi 7 
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int art; f article choisi */ 

nit menu; /• dans ce menu */ 



if (art>249) switch (art) 
{ 

case iQuitter: 
return FALSE ; 
break; 

case iAnnuler: 

SyssemEd(t( Undo) ; r ("application ne gire pas larticle Annuler *l 

break; 

case iCouper; 

if (! System Ed it{Cufj) LECut(hLE): 
break; 

case iCopier 

if (!SystemEdlt(Copri) LECopy(hLE); 
break: 

case i Collar: 

if (!SystemEdit( Paste)) LEPastt(hLE); 
break; 

case iEffacer: 

if (!SystemEdit( Clear)) LEDeletejhLE); 
break; 

case iGauche: 

CtMCkMlt9m{FALSE, iGauche+justif); 

justif = 0; 

CheckMrtem(TflU£, iGauche); 

lnv8lRect(&box); t le rectangle est rendu invalids, il sera done redessine... 7 

break; r . . .au prochain evenement de mise a jour 7 

case iDrorte: 

CheckMlt«m(F^LSE iGauche+justif) ; 

justif - -1 : 

CheekMltem(7TOE, iDroite); 

InvalRect(Kbox); 

break: 

case i Centre: 

CheckMI tern (FALSE. iGauche+justif): 

justif - 1 ; 

CheckMltem{ TRUE, iCentre); 

InvalRect(Sbox); 

break; 
} 

else if (art>0) OpenNDA(art): f ouverlure accessoire de bureau 7 

if (art) HNIteMenu( FALSE, menu): 
return TRUE ; 



/"**• FONCTION MAJFEN: mise a jour du contenu dune fen4tre / 

majFen(port) 
Pointer port; T pointeur sur la fenStre a rafralchir 7 
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Pointer precPort; f pointeur sur le precedent grafport aclif */ 

Rect r: f rectangle intermediate */ 

precPort = GetPort{ ); /* on memorise le grafport actif V 

SetPort(port); r o n change de grafport */ 

Beg In Updale(pon) 

EraseRect{S(DV): /* on efface toute la ligne editable 7 

r = rDV; 

1nsetRect(&r,-1,-1); 

FrameRect(Sr); f on dessine un rectangle contour 7 

LEUpdale(hLE); /* on dessine la ligne editable 7 

r.box; 

lnsetRect(&r,-4,-4); 

FrameRectfBr); r* on dessine un rectangle contour */ 

LETextBoX(text1.213.&box,justif); /* on dessine le texte justifie 7 
Endllpdate(port); 

SetPort(precPort): f on r6tablil le pre^denl grafport 7 

) 

/***" FONCTION ACTFEN: activation ou deactivation d'une fenStre *****/ 

actFen(port) 
Pointer port; r* pointeur sur la fenetre a active r ou desactiver 7 

if (iache .mod/Sere 4 ActiveFlag) L E Active te(hLE); r activation 7 
else LED*aetlvate{hLE): >' deactivation 7 

} 

/*•••• FONCTION SOUR ISO ANS: rSponse a un die souris '""I 

souris Da ns(code) 
int code; /* code retournfi par RndWindow 7 

{ 

if (code<0) SystemCllck(8tache, wind, code); 
else switch (code) 

( 

case wlnMenuBar : 

MenuSelect(&tache, OL); 

indie . ExecMenuftacheTasMJala); 

break; 

case wtnContent : 

if (wind 1= FrontWlndowQ) SelectWindow(wind); 

else LECIickfAtachB, hLE); r gestion par Line Edit du die souris 7 

break; 

case wlrtDrag : 

if (wind I = Front WIndow() 8& !(tache .modifiers & AppteKej/)) 

SelectWindowtwind) ; 
DragWlndow(0, tache. where, 0, OL, wind); 
break; 
1 
} 

/**"* FONCTION CLAVIER: r^ponse a un ev6nement clavier ***•"/ 

clavier( ) 

{ 
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car - tache message & OxFF; 
if (car — 0x08 || car — Ox1S) 

LEKoyfcar, tache. modifiers, hLE); 
else if ( tache. modifiers & AppleKey) 

I 

MenuKey(&tache, OL); 

indie - ExecMenu(tache. TaskData); 



f on garde I'octet le moins significatif */ 
T fleches droits ou gauche. . . 7 
r ...on laisse fairs Line Edit 7 

r touche Pomrne enfoncee... */ 

. .e'est pour le Menu Manager */ 



if( tache. modifiers & OptionKey) 
car |- 0x80 



i* touche Option enfoncee... '1 
. .on force le bit 7 a 1 . 



LEKeyjcar, tache. modifiers, hLE);/* ...on laisse taire Line Edit dans tous les cas */ 
} 



/*"** FONCTION AJUSTECURS: ajuste le dessin du curseur ' 
AjusteCurs( ) 



I 

static modif; 

int ind; 

long pt; 



t le point ou se trouve le curseur */ 



if (FrontWindow( ) k fen) ind - FALSE, 



r noire fenetre doit etre au premier plan 7 



GetMouse(&pt); f le point est en eoordonnees locales du grafport actif 7 

ind - PtlnReet(&pl,&r(LEflec ") hLE)->Wewflecf); 

} 

if [ind — modif} return: 
if (ind) SetCursor(IBeam); 
else SetCursor(arrow); 
modif = ind; 



CHAPITRE IX 



DIALOG MANAGER 



PRINCIPESGENERAUX 

Nous i'avons vu, une application communique avec I'utilisateur par l' intermediate 
des fenetres, et I'utilisateur donne ses directives par rinternuSdiaire des menus 
deroulants. Parfois, une commande appelle ['introduction de certains parametres pour 
etre prise en compte. Dans ce cas, l'application fait appel a une fenetre de dialogue 
pour preciser lesdits parametres. A d'autres moments, I'utilisateur peut faire une 
fausse manreuvre ou tente une action qui peut se reveler dangereuse. Pour le mettre 
en garde, ['application affichera une fenetre d'alerte contenant soit des explications, 
soil la possibility de faire marche arriere. 

Le Dialog Manager a pour mission de gerer les fenetres d'alerte et de dialogue. 
Pour mener a bien cette mission, il utilisera de maniere transparente pour le 
programmeur des appels a QuickDraw, a 1'Event Manager, au Window Manager, au 
Control Manager et a Line Edit. Ce qui explique la localisation de ce chapitre dans cet 
ouvrage. 



Code [ Horn [ 



<S> Celib. 
O Marie 

O Divorce 
O Veuf 

fljouter 



Age 



20 



<S> Masculin 
O Feminih 

E3 Enfants 

Garcons |J 

Filles 



IZZI 



Supprimer 



Quitter 



Figure IX. 1. I. n temple de mudal dialog. 
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Dans la suite de ce chapitre, on sera amene a distinguer deux sortes de dialogues : 
le modal dialog et le modeless dialog. Un modal dialog, au mSme litre qu'une alerte, 
interrompt le fonctionnement de 1'application jusqu'a ce que 1'utilisateur en sorte, soil 
en validant ses modifications et en acceptant de poursuivre sa commande (bouton OK 
ou Equivalent), soit en annulant purement et simplement sa requete (bouton Anmiler 
ou Cancel en anglais ou equivalent), Un modeless dialog n'interrompt pas le 
fonctionnement de ["application, mais coexiste avec elle, modifiant son comportement 
en fonction des options choisies parmi les possibility qu'elle vient offrir. C'est une 
fenetre supplement aire dans 1'environnement de 1'application, et a ce titre, elle en a 
tous les aspects habituels : barre de titre, case de fermeture notamment, Elle pourra 
passer sous d'autres fenetres de 1'application et done devenir inactive. La fenetre d'un 
modal dialog ou d'une alerte, par centre, n'aura pas ces possibility : un cadre fait 
d'un trait double, pas de barre de titre, et impossibility de passer sous une fenetre de 
1* application. Une fenetre d' alerte sera tou jours au premier plan. 

Une fenetre de dialogue pourra contenir toutes sortes d'EIEments : du texte 
d'information et du texte editable, des controles, des images QuickDraw ou des 
icfines, ainsi que tout autre objel d£fini par 1'application. Un modal dialog contiendra 
nEcessairement un bouton OK et un bouton Annuler, pour poursuivre la commande 
ou l'annuler. Une fenetre d'alerte pourra contenir du texte d'information, des images 
ou icones et des boutons simples {au moins un pour pouvoir sortir). Dans toutes ces 
fenetres, un bouton pourra etre privilEgiE, en ce sens qu'il sera Equivalent a Taction 
d'enfoncer la touche Retour (ou Entree) du clavier. Ce bouton aura une representa- 
tion caracteristique, permettant de le distinguer des autres boutons. 



in 

Que rechercher ? 

Remplacer par : 


s Remplacer s= 
Macintosh 




Apple IIGSJ 




(Poursuiure la recherche] [Hemplacef t?t poursuiine 
[R«mpM»< er] [Remplacer partout] 
® Mot entier O Partie de mot 





Figure IX. 2. Un exemple de modeless dialog. 

Dans la figure IX, 3, on a un magnifique exemple a ne pas suivre : un bouton par 
dffaut qui provoque la perte de toutes les donnees de Tutilisateur ! 



o 



Attention! 

Vous allez perdre 
toutes uos donnees! 

Voulez— vous continuer? 



D'accord 



Pas d'accord 



Figure IX.3. I"n Emauvais) exemple d'alerte. 
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UTILISATION DU DIALOG MANAGER 



Fe net res de dialogue et d'alerte 

Le Dialog Manager utilise ce type de fenStre particulier pour creer une alerte ou un 
modal dialog : le cadre est fait d'un trait double, c'est tout : il n'y a pas de bane de 
titre et aucun des controles specihques a une fenetre. L'application preasera la taille 
du contenu de cette fenetre (le PortRect du grafport associe) et si elle est visible ou pas 
au moment de sa creation. 

La fenetre d'un modeless dialog est tout a fait classique, et toutes les caracteristi- 
ques habituelles associees a une fenStre pourront etre utilisces : barre de titre avec 
case de fermeture et case de zoom, modification de taille, defilement du contenu, 
changement de plan, activation, invisibilite. 

Alors que rapplication n'aura aucune flexibility pour manipuler une fenetre 
d'alerte, elle pourra dessiner dans les fenetres de dialogue comme bon lui semble : on 
recuperera en effet a leur creation un pointeur sur le grafport associe, dans lesquel 
toute routine QuickDraw pourra etre ex^cutee, avec respect de la notion de clip 
region. 



Composantes (ou items) d'un dialogue ou d'alerte 

Nous venous de dire qu'une fenetre de dialogue est une fenetre semblable a toutes 
les autres fenStres. Quelle est done la valeur ajoutee qu'apporte le Dialog Manager ? 
Elle reside dans les listes de composantes apparaissant au sein d'une fenStre d'alerte 
ou de dialogue, composantes qu'il gerera automatiquement. 

Chaque composante ou item de la liste contiendra les informations suivantes : 

- un identifiant (entier sur 16 bits) ddsignant l'item : tout appel a une routine du 
Dialog Manager voulant r£ferencer un item se fera par l'interm6diaire de cet 
identifiant. Cette valeur sera done unique pour ['ensemble des items d'une meme 
fenetre de dialogue ou d'alerte ; 

- le type de l'item (valeur pr£cod£e sur 16 bits), qui precisera sa nature et 
determinera done quel traitement le Dialog Manager doit lui appliquer ; 

- un descripteur pour l'item (d£sign£ par un pointeur ou un handle), tel un titre, 
une image ou une procedure de gestion dans certains cas particuliers ; 

- une valeur (entier sur 16 bits) dependant du type de l'item, telle la valeur initiale 
d'un contr61e ou la longueur limite d'une chafae de caracteres ; 

- un rectangle d'affichage, pour determiner la taille et la localisation de l'item au 
sein de la fenetre ; 

- un champ caractenstique (sur 16 bits), dependant lui aussi partiellement du type 
de l'item ; 

- le num€ro d'une table de couleurs permettant de changer les couleurs standard 
utilisces par le Dialog Manager pour dessiner l'item. 

Differentes routines nous permettront, connaissant le pointeur sur le grafport de la 
fenetre de dialogue et I'identifiant d'un item a 1'interieur de cette fenStre, de fixer ou 
de reeuperer le contenu des caract£ristiques de cet item. Caracteristiques que nous 
allons etudier plus en derail maintenant. 



Identifiant d'un item 

Dans toute liste d'items associes a une fenetre de dialogue ou d'alerte, chaque item 
doit poss^der un identifiant unique. Attention, aucun identifiant ne doit etre egal a 
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zero, car le Dialog Manager se sert de cette valeur pour retourner 1'equivalent du 
message « item invalide ou non trouv^ » dans certaines routines. 

Par convention, dans une fenetre d'alerte, l'item possedant 1'identifiant nume'ro 1 
dott correspondre au bouton OK (ou Equivalent), et litem possedant 1'identifiant 
nurnero 2 doit correspondre au bouton Annuler (ou Cancel, ou 1'equivalent). 

Dans une fenetre de modal dialog, le Dialog Manager assume que l'item portant 
1'identifiant numero 1 sera le bouton par defaut (a moins de specifier autre chose), 
c'est-a-dire que si Putilisateur appuie sur la touche Retour ou Entree, ['application 
aura la meme information que s'il avail clique dans l'item par defaut. 

Si l'item numero 1 est effectivement un bouton, le Dialog Manager 1'entourera 
automatiquement d'un second trait (cas des boutons arrondis) ou 1'ombrera {cas des 
boutons rectangulaires), pour que l'utilisateur sache que c'est le bouton par defaut. Si 
l'item numero 1 n'est pas un bouton simple, ou s'il n'existe aucun item portant le 
numero 1 dans la liste, le Dialog Manager ne gerera aucun bouton par deiaut. 



Type de l'item 

Nous de'signerons le type des items par 1'une des constantes pr£d£finies suivantes 



#define Buttonliem 


10 


r bouton simple 7 


#define Checkttem 


11 


T case 4 cocher 7 


#define Radhltem 


12 


r bouton radio */ 


#define ScroilBarltem 


13 


r barre de defilement 7 


#define UserCttltem 


14 


f contrfile propre a I'application 7 


#define StatText 


15 


r texte statique 7 


#defi ne LongStatText 


16 


r texte statique long 7 


#define EditLine 


17 


r ligne de texte Editable 7 


#define tconltem 


18 


T ic6ne 7 


#de1ine Picltsm 


19 


t picture QuickDraw */ 


#define Userttem 


20 


r item propre a I'application 7 


Adeline ItemDisable 


0x8000 


/* a ajouter pour rend re 1'item muet */ 



Les cinq premiers types sont des controles t els que nous les avons rencontres dans 
l'^tude du Control Manager : le bouton simple qui deelenehe une action immediate (et 
notamment la sortie d'un modal dialog ou d'une alerte), la case a cocher qui prend la 
valeur 1 (coehee) ou (non coehee), le bouton radio (membre d'une famillc dc 
boutons radio parmi lesquels un seul a la fois est selection^), la barre de defilement 
(seul exemple predefini de cadran) et tout autre controle que I'application aurait cree 
et ge>erait elle-meme. Pour agir sur ces items, le Dialog Manager fera evidemment 
appel aux routines du Control Manager, mais de maniere transparente au program- 
meur. 

Note La case a cocher s'appelle Checkltem et une procedure du Menu Manager 
CheckMltem Attention aux homonymies ! 

Les types suivants sont propres au Dialog Manager. 

• Le texte statique (StatText) et le texte statique long (LongStatText) representent 
des chaines de caracteres que l'utilisateur ne pourra pas modifier (non editables). 
Elles serviront a afficher des messages, plus ou moins longs. Elles pourront s'etendre 
sur plusieurs lignes, par insertion de return en leur sein. Le return, ou retour-chariot, 
possede le code ASCII 13 et est symbolist en C par le caractere special \r. Un texte 
statique peut poss^der jusqu'a quatre zones parametrables, reperles par les caracteres 
particuliers *0, "1, "2 et "3. On donrrera une valeur (alphanumerique) a chaque 
parametre, et le Dialog Manager substituera les caracteres particuliers. Le texte 
statique est une chaine de type Pascal. Elle est done limitee a 255 caracteres, et le 
premier octet contient la longueur de )a chaine. Le texte statique long est une suite de 
caracteres en nombre inferieur a 32767, le nombre de caracteres etant stocke ailleurs 
(dans le champ valeur assorie a l'item). 
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• EditLine represente une Ligne (el une seule a la fois) de texte Editable, c'est-a-dire 
que 1'utilisateur pourra saisir et modifier a sa guise. Un tel item permettra a 
['application d'obtenir de la part de 1'utilisateur des informations litterales ou 
chiffrees, impossibles a renseigner par I'intermediaire d*un controle. Pour gerer ce 
type d'items, le Dialog Manager fera bien evidemment appel aux routines de 
LineEdit, ce qui signifie que toutes les commandes applicabies en LineEdit sur du 
texte editable continueront a s'appliqiuer lors de 1'utilisation de ces items. Cette ligne 
Editable est une chaine de caraeteres de type Pascal. On pourra en limiter le nombre 
de caraeteres en precisant cette limit e dans le champ valeur associe a 1'item. Notons 
que quand un modal dialog contient 'des lignes editables, il y en a toujours une active 
(materialist par du texte selections ie ou un point d'insertion clignotant). On peut 
sauter d'une ligne editable a une autre par I'intermediaire de la louche de tabulation. 

• Les items de type icone et picture sont a priori la pour faire joli. Cependant, 
comme le Dialog Manager est capabli; de dire a l'application que 1'utilisateur a clique 
dans un tel item, on pourrait tres bien imaginer de les utiliser comme des boutons 
particuliers, pour de'clencher un traitement dans un dialogue. Encore faut-il que 
l'icone soit suffisamment explicite, ou accompagnee d'un commentaire explicite ! 

• Les items propres is Fapplication peuvent etre n'importe quoi, pourvu qu'ils 
soient geres entierement par ['application. 

Quel que soit leur type, les items d'une fenetre de dialogue peuvent etre rendus 
muets. Chaque fois que 1'utilisateur cl ique dans le rectangle de visualisation d'un item 
ou saisit un caractere dans une ligne editable, le Dialog Manager renseigne 
l'application de ces eVenements, Des qu'un item est rendu muet (disabled item), le 
Dialog Manager cesse de renseigner ['application sur les evenements qui I'affectent. 
Par consequent, il est interdit de rend re muet un bouton simple, puisque ['application 
ne serait alors plus capable de savoir si 1'utilisateur a clique 1 dedans pour lancer la 
commande 1 A contrario, tous les t extes statiques devraient etre muets, puisque 
1'utilisateur ne peut avoir aucune action sur eux. De m£me les icones et pictures 
auxquelles on n'aurait pas accords' de vertu particuliere. En regie generate, tout item 
dont on n'a pas besoin de connaitre la valeur durant le dialogue peut etre rendu muet. 
Un cas typique : la ligne de texte editable. Si l'application veut ftltrer ce que rentre 
1'utilisateur (par exemple accepter les chiffres et rejeter le reste), I'item n'est pas muet 
et le controle peut s'effectuer chaque fois qu'une louche est enfoncee lorsque cet item 
est seiectionne. Si par contre l'application accepte n'importe quel caractere ou ne 
souhaite faire un controle qu'en fin de saisie. Litem peut etre rendu muet. 

Un item est normal si son type possede la valeur predefinie qui lui est affectee. 
Pour rendre muet un item, il suffit d 'ajouter a son type la valeur ItemDisable, Ceci 
n'est a faire qu'a la creation, car le I Dialog Manager nous propose deux procedures 
pour rendre muet ou normal un item quelconque d'une fenetre de dialogue. 

On se gardera bien de confondre l<;s qualificatifs muet et inactif (ou desactivi). Un 
item muet est un item actif, sur lequel 1'utilisateur peut agir, meme si ['application n'en 
a pas connaissance. Visuellement, un item muet n'est pas different d'un item normal. 
Par contre, un item inactif (au sens Control Manager du terme) n'est pas accessible 
par 1'utilisateur : il ne repond plus ii ses solicitations, II est d'ailleurs represents 
differemment a I'eeran (litres estompes notamment). Pour desactiver un item, il 
faudra employer la procedure HiliteControl du Control Manager. Le Dialog Manager 
permettra quant a lui de rendre un item invisible. 

Descripteur de I'item 

Quel que soit le type de I'item, son descripteur donne 1'adresse de quelque chose, 
par l'intermediaire d'un pointeur ou d'un handle. Le quelque chose depend du type, 
comme nous l'allons voir immediatennent. 

• Pour un bouton simple, une casie a cocher ou un bouton radio, le descripteur 
contiendra 1'adresse du litre associe (chaine de type Pascal). 

• Le descripteur pour une barre die defilement sera un pointeur sur la fonction 
d' action associee. Cette fonction sera appelee au moment de I' initialisation, et chaque 
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fois que 1'utilisateur provoquera un defilement. Elle devra gerer en temps reel la mise 
a jour de tout ce qui depend de la valeur prise par ce contr61e, sans rien apporter a 
l'application elle-rniSme, de telle sorte que si I'item est rendu muet, ['application ne 
saura rneme pas que I'utilisateur a clique dedans ! 

Attention La fonction d' act ion d'une barre de ddfilement dans un dialogue 
s'apparente evidemment a la procedure d'action dejil vue dans le chapitre sur le 
Control Manager (puisqu'elle va la gene"rer), mais il y a quelques differences notables 
a prendre en compte (notamment le nombre et la nature des arguments, le fait qu'elle 
retourne une valeur, le fait qu'elle est appele'e pour cr^er le controle). 

La fonction d'action d'une barre de defilement appartenant a un dialogue doit 
suivre des regies tres precises : elle sera obligatoirement declares de type Pascal, 
acceptera trois arguments et retournera un r^sultat sur 16 bits. Si notre fonction 
s'appelle Defilement, elle aura un peu cette allure : 

pascal int Defilsmentfcommande, dialogue, id) 



int commande: 
Pointer diabgue: 

int id; 


i 

int valeur; 




swi tch (commande) 




1 

case 1 : 




return valeur 

break. 




case 2: 




return valeur 
break; 




case 3; 




return valeur 
break; 



f prise en compte de I'identifiant de litem */ 
/' valeur "minimale" contrSlee par le defilement */ 



r prise en compte de I'identifiant de I'item 7 

T valeur "maximals" controlee par le defilement V 



r prise en compte de I'identifiant de I'item "I 
r valeur initials du controle 7 



case 4: 

valeur - GetltemValu»(dialogue, id); f ancienne valeur (avant I'evenement) 7 

r defilement d'une unite vers le haut 7 
return valeur; f nouvells valeur pour le controls (modifiee) 7 

break; 

case 5; 

valeur - Get I tern Value (dialogue, id); r ancienne valeur (avant I'evenement) 7 

r dslilement d'une unite vsrs le bas 7 
return valeur; P nouvelle valeur pour le controle (modifiee} 7 

break; 

case 6: 

valeur = GetltemValue(dialogue, id); /* ancienne valeur (avant I'evenement) 7 

I" defilsment d'uns "page" vsrs le haut 7 
return valeur; f nouvelle valeur pour le controle (modifiee) 7 

break 

case 7: 

valeur = GetltemValue(dialogue, id): /* ancienne valeur (avant I'evertement) 7 
r defilement d'une "pags" vers Is bas 7 
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return valeur; f nouvelle valeur pour le controle (modifies) */ 

break; 

case 6: 

valeur = GetltemValu»{dialogue, id); t nouvelle valeur apr£s deplacement 

du curseuf de defilement 7 
r defilement jusqu'S la nouvelle valeur 7 
return valeur; r nouvelle valeur pour le controle (inchangee) 7 

break; 



La fonction doit r^pondre a toutes les sollicitations du Dialog Manager, et ce pour 
une barre de defilement particuliere, ou bien pour un ensemble de barres de 
defilement : on n'est pas oblige d'en avoir une par item, si leur fonetionnement est 
semblable, Elle est appelee au moment de 1 'initialisation de 1'item, et lors de la gestion 
de la fenetre de dialogue, C'est le Dialog Manager qui fixe la valeur de ses arguments, 
et notamment le premier, qui definit le resultat que le Dialog Manager attend. Quand 
les commandes 1, 2 ou 3 sont passes, le contr61e n'existe pas encore : le Dialog 
Manager a besoin de ces valeurs pour les passer en bloc au Control Manager qui va 
cre'er la barre de defilement. Grace a ces valeurs, la taille et la position du cursetir de 
defilement pourront etre ge"r^es par le Control Manager. Quand la commande 4 est 
passee, e'est que 1'utilisateur a clique dans la fleche du haut (barre verticale) ou de 
gauche (barre horizontale). La fonction demande 1'ancienne valeur de 1'item, respond 
immediatement a 1'evenement en gerant le « defilement », et retourne la nouvelle 
valeur du contrSle. A 1'identique, la commande 5 correspond a un clic dans la fleche 
du bas (ou de droite), les commandes 6 a 7 a des clics dans la bande de defilement 
(PageUp et PageDown). La commande 8 intervtent quand 1'utilisateur a deplace le 
curseur de defilement. La fonction commence par se renseigner sur la nouvelle valeur 
de 1'item (attention : la nouvelle, pas 1'ancienne), et fait le travail approprie pour 
afficher les elements en concordance avec cette valeur. 

En reponse aux commandes 4 a 7, on veillera a ce que la nouvelle valeur 
appartienne bien a 1'intervalle autorise, c'est-a-dire qu'elle sott comprise entre et 
max-min (voir le chapitre sur le Control Manager pour plus de precisions). 

• Pour un controle propre a ['application, le descripteur est un pointeur sur la 
procedure de definition du contrdle (dont nous avons evite de parler dans le chapitre 
sur le Control Manager), 

• Pour un texte statique, le descripteur pointe sur la chaine de caracteres de type 
Pascal. Pour un texte statique long, le descripteur pointe sur le debut du texte. 

• Dans le cas d'une ligne editable, le descripteur pointe sur la chaine de caracteres 
qui sera affichee par defaut et que 1'utilisateur pourra modifier. S'il n'y a pas 
d'affichage par defaut, on mettra zero-long. Le texte par defaut de la premiere ligne 
editable du dialogue sera entierement seiectionne au moment de la creation de 1'item. 

• Le descripteur en ce qui concerne les icones et pictures est un handle sur l'icone 
ou la picture concernSe. Une icone est definie par un rectangle (dont la largeur est un 
multiple de 8) suivi de la pixel image de l'icone, une picture est un objet QuickDraw. 

• Pour un item propre a I'application, le descripteur est un pointeur sur la 
procedure de definition de 1'item (dont nous ne parlerons pas plus que les controles 
propres a I'application). 



Valeur de 1'item 

Tout comme le descripteur, la signification de la valeur associee a 1'item depend 
etroitement de son type. Cette valeur sera fixee a la creation de 1'item et pourra ou 
non varier durant le dialogue en fonction des sollicitations de 1'utilisateur. 

• Pour les boutons, la valeur est toujours nulle. 
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• Pour les cases a cocher et les boutons radio, la valeur a la creation est la valeur 
initiale du controle (TRUE ou FALSE dans le cas general, nous utiliserons plutot 1 ou 
0). Cette valeur se modifie au cours du dialogue et est toujours egale a la valeur 
actuelle du eontrSle. 

• Pour les barres de defilement, la valeur est toujours comprise entre et max-min, 
ainsi que nous 1'avons deja vu dans le chapitre consacrC au Control Manager. 

• Pour un texte statique loug, la valeur donne sa longueur (son nombre de 
caracteres) et done ne varie pas durant le dialogue. 

• Pour une ligne Editable, le champ valeur contiem la longueur maximale autorisee 
pour la chaine de caracteres, entre et 255. L'utilisateur ne peut modifier cette valeur, 
1 'application si oui. 

• Dans le cas des textes statiques courts, des icones et des pictures, le champ valeur 
est libre d'utilisation par Implication (le Dialog Manager ne s'en sert pas). 

Rectangle d'affichage de I'item 

Chaque item de la liste est repr&ente dans un rectangle d'affichage. Ce rectangle 
est donne" dans le systeme de eoordonne'es locales et situe done I'item a 1'interieur de la 
fenetre. Le rectangle doit completement englober I'itern, sinon certains types d'items 
peuvent etre coupes, le rectangle pouvant agir comme une clip region pour leur 
representation. Quand un item est rendu invisible, le Dialog Manager fait en realite 
(entre autres choses) un EraseRect du rectangle d'affichage de I'item concern^. Quand 
un clic souris est detecte, il est cense s'adresser a un item particulier s'il a eu lieu dans 
le rectangle d'affichage de cet item. Si deux ou plusieurs rectangles out une 
intersection non vide, e'est le premier item rencontre" dans la liste qui sera pris en 
compte au cas ou le clic souris se produirait dans cette intersection. 

• Pour l'ensemble des controles (boutons, cases a cocher, boutons radio, barres de 
defilement), le rectangle d'affichage est celui qui servira a la creation du controle par 
le Control Manager (appele" directement par le Dialog Manager). 

• Pour une ligne editable, le rectangle est pris comme le rectangle de visualisation 
au sens de LineEdit. Done aucun texte ne peut etre saisi ou affiche" en dehors de ce 
rectangle. De plus, le Dialog Manager dessine un cadre autour de ce rectangle, ce qui 
permet d'identifier les textes editables. 

• Pour les textes statiques (courts ou longs), le rectangle possede le meme 
comportement que pour la ligne Editable, mais peut contenir plusieurs lignes. Aucun 
cadre n'est dessine autour du rectangle. 

• Pour les ic&nes et les pictures, le rectangle est pris comme rectangle de 
destination, conformement a 1'un des parametres des procedures QuickDraw Paint- 
Pixels ou DrawPicture. Les images sont done mises a I'echelle (avec les deformations 
qui s'ensuivent) ou clippecs pour tenir a I'interieur du rectangle. 

Champ caracteristique de litem 

Pour les veritables contr&les (boutons simples, cases a cocher, boutons radio et 
barres de defilement), ce champ contient des caractcristiques absolument identiques a 
celles rencontr^es dans le chapitre consacr£ au Control Manager. Nous ne les 
redonnerons done pas ici. 

En ce qui concerne les types propres au Dialog Manager, aueune definition n'est 
disponible. On passera done la valeur 0. 



Couleurde I'item 

Pour les veritables contrdles (boutons simples, cases a cocher, boutons radio et 
barres de defilement), ce champ contient des caractcristiques absolument identiques a 
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celles rencontres dans le chapitre consacre au Control Manager. Nous ne les 
redonnerons done pas ici. 

En ce qui concerne les types propres au Dialog Manager, aucune definition n'est 
disponible. On passera done la valeur 0. 

Structure de type dialogue 

Une application va creer des listes d'items correspondant a des fenetres d'alerte ou 
de dialogue. Le Dialog Manager va stocker ces donnees dans une structure 
particuliere, appelee dialog record. Cette structure ne sera pas decrite. pour la bonne 
et simple raison qu'une application n'a pas le droit d'aller modifier directement les 
donnees qu'elle contient. C'est le Dialog Manager et lui seul qui doit y acceder. Pour 
qu'une application puisse modifier les caracteristiques d'un item, il fournit tout un 
ensemble de procedures qui rendent inutiles la divulgation du format de cette 
structure, ce qui permettra eventuellemem* de le revoir lors d'a meliorations futures 
sans nuire a la compatibility des applications existantes. 

Sur Macintosh, les alertes et dialogues etaient declares sous forme de ressources, 
dans des fichiers separes du programme source, suivant un format tres precis. Sur 
1' Apple irGS, on aura deux manieres de proceder : soit creer les elements un a un, 
soit utiliser des formats pred^finis (templates), cette derniere possibility palliant 
partiellement I'absenee du resource manager sur cette machine. 

Sauf cas particulier, on utilisera les routines du Dialog Manager et non celles du 
Control Manager pour manipuler les items d'un dialogue. Par construction, tous les 
items ont une structure de controle. C'est evident pour les vrais controls (boutons 
simples, cases a cocher, boutons radio, barres de defilement), mais c'est aussi le cas 
pour les items propres au Dialog Manager. On risque d'obtenir des resultats 
surprenants en manipulant ces items comme de vrais eontrdles ! Une seule procedure 
du Control Manager sera vraiment interessante a utiliser, HiliteControl pour 
desactiver ou reactiver un controle (un vrai !), en cours de dialogue. 

Cas particulier des alertes 

Une alerte est reperee par un identifiant. Elle se pr^sente sous la forme d'une 
fenetre sans barre de titre, contenant une liste d'items qui sont soit de simples boutons 
(au moins un et generalement pas plus de deux), soit des items informatifs (texte 
statique, ic6ne, picture). n'y a pas dialogue avec 1'utilisateur : celui-ci peut 
seulement dire a Implication qu'il a bien recu le message. 

Ouand I'alerte doit servir a expliquer a 1'utilisateur qu'il s'est trompe pour une 
raison ou pour une autre, on peut avoir envie de donner des messages differents en cas 
de recidive (plus de renseignements par exemple en cas de persistance dans I'erreur). 

Le Dialog Manager offre quatre niveaux pour une alerte donnee. Pour chaque 
niveau, ['application doit decrire la marche & suivre. A la premiere erreur, c'est 
Taction numero 1 qui sera utilisee (par exemple un simple « bip », sans affichage de 
fenitre). A la deuxieme erreur identique consecutive, Taction numero 2 prendra le 
relats (par exemple en affichant un message explicatif sans « bip » sonore). A la 
troisieme erreur consecutive. Taction numero 3 prendra le relais (par exemple en 
lisant par voix synth^tisee le message affiche dans la fenetre). A partir de la quatrieme 
erreur consecutive et pour toutes les suivantes, c'est Taction 4 qui sera appelee. 

Pour savoir si deux alertes sont conseeutives, le Dialog Manager garde en memoire 
Tidentifiant de la derniere alerte utilisee. Si I'alerte actuelle pone le meme identifiant, 
il y a consecutivite, sinon le niveau est remis a 1. 

Pour dSfinir chaque niveau d'action, on donnera les trois informations suivantes : 

- quel est le bouton par defaut (OK ou Anmiler) ; 

- la fenetre doit-elle etre dessinee ou non ; 

- lequel des quatre sons possibles doit etre £mis a ce niveau. 
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Les sons soitt numerates de a 3. Par defaut, le son est insonore, le son 1 emet 
un • bip », le son 2 deux « bips » et le son 3 trots « bips », Si le programmeur souhaite 
personnaliser ses sons, il pourra le faire en ecrivant une procedure style Pascal, 
ad me tt ant un argument qui peut prendre les valeurs a 3. La procedure, si nous 
I'appelons MesSons, aura la forme suivante : 

pascal void MesSons (quelSon) 

int quelSon; 

{ 

switch (quelSon) 

I 
case 0: 

f definition du son V 
break; 

case 1: 

r definition du son 1 V 
break; 



case 2: 

break; 

case 3: 

break; 
} 



r definition du son 2 •/ 



r definition du son 3 */ 



Pour respecter I'interface utilisateur, le num£ro 1 devrait toujours etre un « bip » 
simple. II est en effet automatiquement utilise' par le Dialog Manager chaque fois 
qu'un utilisateur clique en dehors d'une fenetre d'alerte ou de modal dialog. 



EXEMPLES D'UTILISATION 



Initialisation 

Avant d'initialiser le Dialog Manager, il faut avoir initialise le Memory Manager, 
QuickDraw, I'Event Manager, le Window Manager, le Control Manager et LineEdit, 
dans cet ordre. On peut alors appeler la procedure DiaiogStartUp. qui installe la 
procedure standard dc sons, initialise k vide les chaines de caracteres pouvant servir de 
parametres dans les textes statiques, prend pour police de caracteres la police systeme 
et fixe le niveau d'alerte a 1. Un seul argument est requis, le sempiterne) num£ro 
d'application retourne par ta fonction MMStartt'p du Memory Manager. 

Pour empecher le Dialog Manager d'utiliser la police de caracteres systeme pour 
dessiner les textes (titres des contrSles, textes statiques et lignes editables), on peut 
utiliser la procedure SetDAFont en passant en argument un handle sur la nouvelle 
police choisie. 



Creation d'un modal dialog et de ses items 

II existe plusieurs moyens pour cr£er un modal dialog, suivant qu'on utilise ou non 
les modeles pridfifinis (templates). II existe deux sortes de modules pr£d£finis : les 
modeles d'items et les modeles de dialogues. 
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O Quand on n 'utilise pas de module pr£defini, on commence par appeler la fonction 
New Modal Dialog, qui va creer la fenetre de dialogue, puis autant de fois qu'on veut 
d'items NewDItem, pour creer les items de cette fenetre. 

NewModalDialog reclame les trois arguments necessaires a la creation d'une 
fenetre dont le type est forc£ (pas de barre de titre, aucun controle standard associd) : 

- le rectangle qui sera le Port Red du grafport associe a la fenetre (en coordonnees 
globales, pour d^finir sa taille et sa localisation a I'ecran), reper£ par un pointeur ; 

- un indicateur precisant si la fenetre sera visible (TRUE) ou pas (FALSE) ; 

- la valeur d'utilisation libre associee a chaque fenetre {wRefCon, un entier sur 
32 bits). 

La fonction NewModalDialog retoume un pointeur sur le grafport de cette fenetre 
de dialogue, que nous appellerons d€sormais pointeur sur dialogue, meme si le terme 
est impropre. Elle alloue l'espace necessaire a la structure dialogue. Si la fenetre est 
d^claree visible, elle est dessinee a I'ecran. Sinon elle est seulement cr£ee et pourra 
etre rendue visible plus tard par la procedure Show Window du Window Manager. 
Cette possibility est int^ressante pour faire apparaitre tous les items en mfime temps, 
et non au fur et a mesure de leur creation. On veillera comme d'habitude I ce que la 
fenetre cre£e n'aille pas se cacher partiellement sous la barre de menus, ce qui fait 
neglige. 



ffecf r; P un rectangle V 

Pointer dig: F sera le pointeur sur dialogue V 

SetRect(&r, 50, 50, 270, 150); t on definit le rectangle contenu 7 

dig = NewModalDlalog(S>r. FALSE, 0L); /* on cree la fenetre du modal dialog (invisible) */ 

Une fois un pointeur sur dialogue recup£re\ on peul appeler la procedure 
NewDItem pour ajouter un item a la liste. Cette procedure reclame huit arguments. Le 
premier indique i quel dialogue appartient 1'item, par l*interm£diaire d'un pointeur 
sur dialogue. Les sept autres arguments decrivent les caracteristiques de 1'item : son 
identifiant, un pointeur sur son rectangle d'affichage, son type, son descripteur, sa 
valeur initiale, son champ caracteristique et un pointeur sur sa definition de couleur. 
Nous ne reviendrons pas sur la description de ces arguments (voir plus haut). 

char OKslr[ ] = "\20K": f OKstr points sur une chatne Pascal V 

Rect OKrect = {10, 10, 30, 30): I" rectangle en coordonnees locales */ 

NewDltam(dlg, 1 , SOKrect. Butlonltem, OKstr, 0, 0, 0L): r ajout d'un item 7 

r ajout d'autres items V 
ShowWlndow{dlg); /* on rend la fenetre visible */ 

SelectWindow(dlg); /* on rend la fenetre active V 



La procedure NewDItem associe 1'item a la fenetre precisee en argument. II 
apparalt a I'ecran seulement si celle-ci est visible. Rappelons que si a la valeur du type 
on a ajoute la valeur pr£d£finie ItemDisable, 1'item sera muet et les evgnements 
I'affectant ne seront pas rapportes a 1* application. 

Notons qu'on passe dans le champ caracteristique, et pourtant le bouton sera le 
bouton par defaut, parce qu'il parte 1'identifiant 1. Le Control Manager nous aurait 
oblige a passer la valeur 1 dans le champ, le Dialog Manager 1'ajoute pour nous. 

o Un modele pr£d6fini peut Stre consider^ en C comme une structure particuliere, 
qu'on manipulera classiquement. Manipuler est un bien grand mot, car en g£n£ral, 
tout ce que ['application aura a faire sur elle, e'est son initialisation. 



252 I BOlTE A OUTILS DE L'APPLE IIGS 



• Le module d'item pourra etre d£fini de la maniere suivante : 



struct JtemTemplate { 

int I temID; 

Rect itemRect ; 

int itemTypQ ; 

Pointer itemDesgr: 

int itemValua ; 

int itemFlag ; 

Pointer itamColor; 

}: 
#define ItemTemplate struct JtemTemplate 



f identifiant de I'item 7 

P rectangle d'affichage de I'item 7 

r type de I'item, eventuellement rendu muet */ 

T descripteur de I'item, pointeur ou handle 7 

r" valeur de I'item a la creation */ 

f champ caracteristique de I'item 7 

r pointeur sur table de couleurs */ 



On retrouve integralement les caracteristiques d'un item, telles qu'elles ont ete 
decrites plus haut et telles qu'elles sont passees en argument a la fonction NewDItem 
(a la difference pres que dans cette structure on manipule le rectangle, et non un 
pointeur sur rectangle). Par centre, aucune reference n'est faite a une fenetre de 
dialogue particuliere : le modele d'item est independent du dialogue dans lequel il 
sera utilise^, et rien n'empeche de creer des modeles d'items a utiliser dans plusieurs 
dialogues differents, tels les boutons OK et Annuler, par exemple. 

- modele pour un bouton OK : 



HemTBmplate OKbouton 
1, 

(10,10,30,50), 
Button/tern, 
"\20K", 
0, 
2, 
0L 
): 



/* identifiant: ce seta le bouton par deTaut 7 

f rectangle en coordonnees locates 7 

t type bouton, valeur pnSdefinie 7 

T pointeur sur litre, chains type Pascal 7 

r valeur initiale. loujours pour un bouton simple */ 

I" caracteristiques (bouton rectangulaire) 7 

f couleurs par defaut 7 



modele pour une case a cocher 



ItemTempiatB cocher m { 
5, 

(35, 10,50,130), 
Checkttam, 
"\12Dejacoche", 
1, 
0, 
0L 



/* identifiant: stride ment superieur a 1 */ 
/* rectangle en coordonnees locales 7 
F type case a cocher, valeur predefinie 7 
f pointeur sur titre, chains type Pascal 7 
f valeur initiale, la case sera cochee 7 
t caracteristiques (rien k signaler) */ 
F couleurs par defaut 7 



modele pour un bouton radio : 



ItamTemplata radio > 
12, 

{55, 10,70, 130). 
Radioltem, 
"\10Optbn 1*, 
1, 
6. 
0L 
}: 



r identifiant: strictement superieur a 1 7 
f rectangle en coordonnees locales 7 
f type bouton radio, valeur predefinie 7 
C pointeur sur Mire, chatne type Pascal 7 
/"valeur initiate, ce sera le bouton selectionne 7 
r caracteristiques (appartient a. la famille 6) 7 
r couleurs par defaut 7 
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- modele pour une barre de defilement : 

int De(ilement( ); F declaration de la fonction d'action */ 

ItemTemplale barre = { 

23, F identifiant: strictemenl supeiieur a 1 */ 

[40, 140, 135, 160}, F rectangle en coordonnees locales 7 

SerottBarttem + HemDisable, F type barre de defilement (muette) 7 

Defilement, F pointeur sur la fonction d'action, definie ailleurs 7 

19, F valeur initials, comprise entre et max-min V 

3, F caracteristiques (barre verticale avec deux fieches) */ 

0L F couleurs par defaut */ 

J; 

- modele pour im texte statique court : 

ItemTemptats texlstat - { 

28, F identifiant: strictement supsrieur 41*/ 
{95, 10, 1 10, 130}, F rsctangle en coordonnees locales V 
StatText* HemDisable, F type texte statique (must) */ 
"\10un texte", F pointeur sur texte, chaine type Pascal '/ 
0, r valeur initiate, ignoree du Dialog Manager */ 
0, F caracteristiques (rien 4 signaler) 7 

0L F couleurs par defaut *l 

>: 

- modele pour une ligne editable : 

ItamTemptate ligne = ( 

29, F identifiant: st/ictement superieur 4 1 7 
(1 15, 10, 130, 130}, F rectangle en coordonnees locales V 
EditLine + ItemDisable, F type ligne editable (muette) 7 

"\6defaut", F pointeur sur texte par defaut, chaine type Pascal 7 

1S i F nombre maximal de caracteres de la ligne editable */ 

0, F caracteristiques (rien 4 signaler} 7 

0L F couleurs par defaut 7 

H 

La procedure GetNewDItem permet d'ajouter a un dialogue un item defini par un 
ItemTemplate : il suffit de lui passer deux arguments, un pointeur sur le dialogue vise 
et un pointeur sur 1'item desire. 

GetNewDltem(dlg, AOKbouton) ; F ajout d'un nouvel item au dialogue dig 7 



Cette instruction est equivalente k celle vue plus haut, avec NewDltem, mais 
presente l'avantage d'etre plus facile a maintenir, puisque les donnees sont separees 
de 1'instruction elle-meme. II sera done preferable d'utiliser les modeles pr£d6finis, et 
meme de les initialiser dans des fichiers s£par£s des fichiers destructions programme 
proprement dits. 

• Le modele de dialogue pourra etre defini de la mamere suivante : 

struct _DialogTemplate { 

Reel BaundsRect ; F rectangle contenu de la fenetre 7 

int Visible; r T R U E si fenetre visible, F ALS E sino n 7 

long RelCon ; F valeur libre associee 4 la fenetre */ 

Pointer Warns) ] ; F lisle variable de pointeurs sur item, terminee par 0L 7 

V. , , 

#define DialogTemplate struct DiaiogTem plate 
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On retrouve au d£but du module les trois valeurs qu'on passe en argument a la 
fonction NewModaJDialog, a la difference qu'on utilise le rectangle et non un pointeur 
sur rectangle. On donne ensuite une liste de pointeurs sur items definis par 
ItemTemplate, liste de longueur variable terminee par zero-long. 

Supposons qu'on ait ct€€ cinq items comme ceux vus plus haut, et qu'on les ait 
appeles item 1, item 2, item 3, item 4 et item 5. On pourra initialiser un DialogTem- 
plate ainsi : 

DialogTemplam dialogue = ( 

{50, SO, 1 50, 270), r le rectangle 'I 

TR UE . /* fenetre visible */ 

OL, T valeur d'utilisarjon libre V 

{&item1 , Sitem2, S items, &item4, &item5, OL) /* liste des items */ 

); 



II suffira alors d'appeler la fonction GetNew Modal Dialog en lui passant l'adresse de 
ce DialogTemplate pour cr6er la fenetre de dialogue avec tous ses items en place. 
Cette fonction retournera un pointeur sur le dialogue, qui est rappelons-le plus 
exactement un pointeur sur le grafport de la fenltre de dialogue. 



dig . GetNewModalDlalogf&dialogue); /* citation de la fenetre complete 7 

La fenetre ayant etc declaree visible dans le template, elle devient im media feme nt 
active. Comme pour les items, le fait de travailler avec des templates presente l'interet 
de pouvoir separer les donnees de I 'instruction proprement dite, ce qui facilite la 
maintenance de I'application, et son internationalisation. 

• La bonne marche a suivre sera done la suivante : 

1. Declarer et initialiser toutes les chaines de caracteres (litres, textes statiques, 
contenus par d6faut d'une ligne Editable). Cette etape est optionnelle, nous avons vu 
que nous pouvons glisser directement les chaines de caracteres a I'interieur de la 
definition de 1'item, parce que le champ itemDescr est declare de type Pointer, et non 
de type long (a condition que l'environnement de travail I'accepte), 

2. Declarer s'il y a lieu toutes les fonctions d'action dont l'adresse intervient dans la 
definition des items. 

3. D£crire tous les items des dialogues en suivant les modeles predefinis. 

4. DScrire les fenetres de dialogues en suivant les modeles pr6d£finis. Une regie 
importante devra etre suivie, pour eviter des surprises desagr£ables. Puisque la 
structure DialogTemplate est de longueur variable, il faut commencer par declarer 
celle qui a le plus d'items. Cela fixera une taille maximale, qui ne genera pas les autres 
declarations. 

Ces quatre etapes s'effectueront en dehors de toute fonction (variables globales), 
et meme dans un hchier de donnees separe, quitte a I'mserer par la suite a I'endroit 
requis grace a une directive ^include. 



Gestion d'un modal dialog 

Une fois que la fen£tre de modal dialog est creee, que tous ses items sont en place, 
qu'elle est visible et active (elle est done au premier plan), I'utilisateur pcut 
commencer a jouer avec. Tous les evenements survenant a partir de ce moment vont 
etre geres par une fonction unique, Modal Dialog, qui doit etre appelee jusqu'a ce que 
I'utilisateur quitte le dialogue en cliquant dans un bouton. En d' autres termes, il faut 
boucler sur cette fonction jusqu'a ce que le dialogue soil ferme. 
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Comment fonetionne ModalDialog ? Si la fenetre de premier plan n'est pas un 
modal dialog, elle retourne la valeur zero et ne fait lien. Si la fenetre de premier plan 
est effectivement un modal dialog (c'est tout de meme preTe'rable !), ModalDialog va 
intercepter les evenements et les gerer elle-merne. De plus, si I'evenement a lieu dans 
un item normal (non muet), elle retournera 1'identifiant de ['item, de telle sorte que 
I' application pourra a son tour faire les actions appropriees liees k cet item (par 
exemple activer ou desactiver d'autres items, changer la valeur d'un contr61e ou ne 
rien faire du tout), avant de revenir appeler ModalDialog. 

ModalDialog admet un argument unique, qui est un pointeur sur une fonetion type 
Pascal qui sert de filtre aux evenements. Quand la valeur zero-long est passee en 
argument, un filtre standard est utilise : si 1'utilisateur appuie sur la louche Retour ou 
Entree, ModalDialog retournera 1'identifiant du bouton par defaut ; et les combinai- 
sons de touches Pomme-X, Pomme-C et Pomme-V permettront le couper-copier- 
coller k rinterieur du dialogue. 

Si nous voulons utiliser notre propre,filtre, nous eerirons une fonetion type Pascal 
possedant trois arguments, de la maniere suivante : 

pascal int monRltre (dialog, event, itemHit) 

Pointer dialog; r pointeur sur dialogue V 

TaskRec ' event; f pointeur sur 6venement 'I 

int * itemHit; /* pointeur sur litem concerne */ 



int car; 

if ((eve nl-> what == KayDown || events- wrfjal== AutoKay) 88. 
!(event-^»meoYfrera £ AppieKay)) 

I 

car ■ (int) event-> message & QxOOOOQOFF: 
car m (car < 'a' I car > 'z') ? car : car + 'A' - 'a*: 
event->/7jessage = (long) car; 
} 
return FALSE ; 

} 

La fonetion filtre precedente teste si I'evenement est une touche enfoncee 
(Key Down ou AutoKey) sans que la touche Pomme le soit elle-m£me. Si ces 
conditions sont vraies, elle recupere le code ASCII du caractere enfonce, et 
transforme les lettres minuscules en lettres majuscules. Dans tous les cas, la fonetion 
retourne la valeur FALSE, indiquant a ModalDialog qu'elle doit traiter l'ev£nement 
comme si de rien n'etait. On constate par cet exemple que les trois arguments ne 
servent pas systematiquement. Ce filtre (c'est implicite) n'agira que sur les lignes 
cditablcs du dialogue, forcant toute saisie de lettres a s'effectuer en majuscules. La 
valeur {* itemHit) est indeterminee en entree, puisque la fonetion filtre gere tous les 
evenements (v eompris revenement null et pas seulement les dies souris. 11 est done 
impossible de savoir sur quelle ligne Editable le filtre agit, puisque le Dialog Manager 
n'offre aucune fonetion retournant I'actuelle ligne Editable active, et ne permet pas 
d'aller lire directement le champ du Dialogrecord qui contient cette information ! 
C'est la un tr&s gros manque (voir l'exemple en fin de chapitre). 

Si le filtre retourne TRUE, la fonetion ModalDialog sera interrompue et renveiTa 
la valeur (* itemHit). Done, 1'evinement est traite comme un clic souris dans I'item 
identify par (* itemHit). L'application doit renseigner cette valeur avant de rendre la 
main : c'est cette possibility qui oblige le filtre a utiliser un pointeur sur identifiant. 

Remarquons au passage que grace k cette fonetion de filtrage, rien n'empeehe 
qu'une action de 1'utilisatcur dans un item d'un dialogue provoque 1'appel d'une alerte 
pour signaler une erreur. Dans ce cas et uniquement dans ce cas, la fenetre de modal 
dialog n'est plus au premier plan. Mais ModalDialog gerera toute seule les evenements 
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d'activation et de mise a jour de fenetre qui resulteront de la fermeture de l'alerte 
(tout au moins en ce qui conceme les items assoties a la fen&tre : si l'application lui 
rajoute ses propres textes ou dessins, ceux-ci ne seront pas rafraichis). On pourrait 
imaginer £galement qu'un dialogue appelle un autre dialogue, mais ce style de 
programmation ne devrait pas avoir cours, par respect pour 1'utilisateur. 

Pour utiliser son propre filtre et conserver les vertus du filtre standard, ce qui est 
bien pratique, on appellera ModalDialog de la fagon suivante : 

int item; 

int monFiltre( ); f declaration de la fonction filtre V 

do 

{ 

item = Modal Dial og((k>ng) monFiltre | 0x80000000); 

} 
while (item > 2); 

Dans cet exempie, on boude sur ModalDialog en utilisant un filtre propre et le 
filtre standard (le bit 31 de l'argumerit a 6te' force a 1). On ne fait aucun traitement 
particulier sur les items (a part forcer les caracteres en majuscules). Cet exempie 
assume qu'il n'y a que deux boutons simples, dont les identifiants sont 1 (bouton par 
defaut, par exempie OK) et 2 (bouton Annukr). On sort de la boucle si 1'utilisateur 
clique dans Tun des deux boutons (obligatoirement actif et non muet). L'application 
va alors tester lequel des deux a ete enfonce\ et si c'est le bouton OK, recuperer les 
valeurs contenues dans chaque item susceptible d'avoir ete modifie pour poursuivre le 
traitement, Une fois les valeurs recuperees, le dialogue pourra etre ferme. Remar- 
quons incidernment que si tous les items sauf les boutons simples sont muets, il n'y a 
mime pas besoin de boucle ! 

Les belles applications pourront utiliser la fonction filtre pour changer le dessin du 
curseur quand il passe au-dessus d'un texte Editable (voir le chapitre VIII). Ce n'est 
pas tres complique, puisqu'on a a chaque instant sa position par 1'intermediaire du 
champ where de I'evenement : on n'a qu'a convertir en coordonnees locales et verifier 
l'appartenance ou non au rectangle de visualisation, suivant une technique de\ja vue 
plusieurs fois. 

ModalDialog traite les evenements de la maniere suivante : 

- elle gere completement les ev£nements d'activation et de mise a jour de la 
fenetre de dialogue, mais en ce qui concerne les items uniquement : si l'application va 
ecrire dans la fenetre directement, le Dialog Manager ne le sait pas ! 

- si un clic souris intervient dans une ligne editable, elle agit com me agirait Line 
Edit : affichage d'un point d'insertion ou selection d'une partie ou de la totalite de la 
ligne, reponse au double-clic pour selectionner un mot, au triple-clic pour selectionner 
la ligne entiere, etc. Les Evenements de type clavier (hormis I'invocation des touches 
Retour et Entree) ne sont geres que dans les items de ligne editable, sauf specification 
contraire due k la presence d'un filtre particulier (gestion de touches de commande, 
par exempie) ; 

- si la souris est pressee dans un contrSle de type bouton, elle appelle 
TrackControl. Si la souris est relachee a I'interieur du controle et que cclui-ci n'est pas 
muet, elle renvoie son identifiant. Sinon, elle ne fait den. II appartient a l'application 
de fixer la nouvelle valeur du controle, ce qui provoquera le dessin correct du ou des 
boutons (voir le chapitre sur le Control Manager) ; 

- si la souris est pressee dans une barre de defilement, elle appelle aussi 
TrackControl, mais en passant I'adresse d'une fonction d'action definie par la barre 
(voir plus haut) ; 

- si la souris est pressee dans n'importe quel autre item actif et non muet, elle 
retoume ['identifiant de I'item ; 

- si la souris est pressee dans un item muet ou dans aucun item, elle ne fait rien. 
De meme si aucun evenement ne survient ; 
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- si la souris est pressee a 1'exterieur de la fenetre de dialogue, elle 6met le son 
nume^o 1 (un « bip » unique tel que regl£ par le Tableau de Bord si la procedure 
standard de son est utilisee). 

Suppression cf items, desa I location d'un dialogue 

II est possible de rendre invisible un item, nous le venons plus loin. Mais quand un 
item ne doit plus etre utilise dans un dialogue, pour quelque raison que ce soil, autant 
le supprimer purement et simplement de la liste des items. C'est le role de la 
procedure Remove! tem, qui efface l'item de l'ecran (si necessaire) et supprirae du 
dialogue passe en premier argument l'item dent 1'identifiant correspond au second 
argument. 

Une fois qu'on en a termini avec le dialogue, si 1'utilisateur a clique dans un 
bouton simple (cas d'un modal dialog) ou dans la case de fermeture (cas d'un modeless 
dialog), deux possibility se pr£sentent : soil on rend le dialogue invisible, soit on le 
desalloue. 

Si I'application risque de le reutiliSer rapidement, il est peut-etre preferable de 
simplement le rendre invisible, avec HideWindow, Tout reste en place et occupe de la 
memoire, mais il sera instant ntiement present au prochain appel (il suffira de le rendre 
visible et d'activer la fenetre). 

Si le dialogue a peu de chances d'etre rappele, ou si ['application a besoin d'espace 
memoire, il est preferable de d^sallouer toutes les structures liees a ce dialogue. La 
procedure CloseDialog est la pour cela, Une fois appelee, il n'en restera plus grand- 
chose : tous les items (sauf les icones et pictures, qui pourraient etre des objets utilises 
ailleurs) seront effaces de la memoire, ainsi que les elements qui pourraient s'y 
rapporter, La fenetre elle-mcnie est detruite, comme le fait la procedure CloseWin- 
dow, a laquelle CloseDialog fait d 'ailleurs appel. Un seul argument pour cette 
procedure : le pointeur sur le dialogue a detruire. Si 1'application desire de nouveau 
I'utiliser, elle n'aura plus qu'a le recr£er de toutes pieces. 

Creation et gestion d'alertes 

Une alerte est d'un maniement beaucoup plus simple qu'un dialogue, car elle se 
gere toute seule : elle fonctionne comme- un modal dialog, sauf que des que 
1'utilisateur a provoque" un £v£nement dans un item non muet, elle rend la main a 
1'application en desallouant tout I'espace memoire qu'elle occupait. Ainsi, avec une 
seule fonction. Alert, on obtient les actions suivantes : creation de I'alerte (fenetre et 
items), gestion de I'alerte, destruction de I'alerte. Facile, non ? 

Cette fonction reclame deux arguments : un pointeur sur un module pred£fini de 
creation d' alerte et un pointeur sur une fonction de filtre. Le modele pred£fini va 
servir a appeler (de maniere transparente) la procedure GetNew Modal Dialog (pour 
cr£er I'alerte), done on va retrouver avec quelques modifications et ajouts la plupart 
des elements qui sont necessaires a son utilisation. La gestion de I'alerte se faisant par 
un appel unique (et non dans une boucle) et transparent a la fonction Modal 1 Dialog, la 
fonction de filtre en sera 1'argument, et la valeur zero-long pourra etre passee pour 
utihser le filtre par defaut. 

Le modele d'alerte pourra etre d£fini de la maniere suivante : 

struct _AlertTem plate { 

Rect BoundsRect ; /* rectangle contenu de la fenetre V 



Atert/0 
char stage f 
char stageZ 
char stagei 
char stage4 
Pointer llems[ ] 

I: 

#define AlBrtTemptate struct _AlertTemplate 



r identifiant de I'alerte */ 

f definition du niveau 1 de I'alerte */ 

r definition du niveau 2 de I'alerte "/ 

r definition du niveau 3 de I'alerte '/ 

r definition du niveau 4 de I'alerte 7 

r liste variable de pointeurs sur item, terminee par OL V 
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• On constate quelques differences par rapport au DialogTemplate : 

- l'absence du champ Visible (la notion de visibility est geree pour chaque 
niveau d'alerte) ; 

- l'absence du champ wRefCon (['application n'a absolument pas I'occasion de 
manipuler la fenetre d'alerte, done pas de valeur libre utilisabie) ; 

- la presence de champs propres a l'alerte. 

• Les autres champs sont identiques (la liste des pointeurs doit toujours etre 
terminee par zero-long). La remarque faite a propos de !a definition des dialogues 
s'applique aussi a la definition des alertes. Si une application doit utiliser plusieurs 
modules d'alerte, elle commencera par initialiser celui qui possede le plus d'ttems, afin 
que suffisamment d'espace soit reserve pour cette structure de taille variable. 

• L'identifiant de l'alerte est un nombre unique pour 1'ensemble des alertes d'une 
application : si 1'application definit 10 AleriTemplate, chacun aura un identifiant 
different. GrSce au parametrage des textes stattques, un modeie d'alerte peut servir a 
1'ensemble des messages d'erreurs d'une application ! 

• Les quatre niveaux d'alerte seront definis chacun sur un simple octet, les bits 
ayant la signification suivante : 

- bits a 1 : numero du son a emettre au niveau donne (compris entre et 

3); 

- bits 2 a 5 : inutilises ; 

- bit 6 : identifiant du bouton par defaut, moins 1 : seuls les boutons 

d'identifiant 1 (bit a 0) et 2 (bit a 1) sont done possibles ; 

- bit 7 : a 1 si la fenetre doit etre affichee a ce niveau, pour avoir 

simplement le son. 

La fonction Alert retourne l'identifiant de l'item non muet dans lequel 1'utilisateur 
a clique. Rappelons encore une fois comment fonctionne Alert (les appels sont 
implicites) : 

1. Creation d'une fenetre par appel a GetNewModal Dialog ; 

2. Comparaison avec la derniere alerte appelee pour determiner son niveau ; 

3. Action en fonction du niveau : procedure sonore puis procedure visuelle ; 
Si procedure visuelle (bit 7 positionne) : 

4. Affichage de la fenetre et appel de la fonction Modal Dialog ; 

5. Des que 1'utilisateur clique dans un item non muet, Modal Dialog retourne son 
identifiant ; 

6. Appel de CloseDialog pour purger items et fenetre de la memoire ; 

7. Alert retourne l'identifiant de l'item. 

Dans cette succession d'actions, on constate que rien n'empeche l'alerte de 
posseder les memes items qu'un dialogue, Cependant, la destruction des items avant 
que 1'application ne retrouve le eontrole des operations interdit la presence d'items 
pouvant prendre plusieurs valeurs, puisqu'on n'a aucun moyen d'aller lire la valeur 
finale. Par ailleurs, il serait d'un effet assez desastreux que 1'utilisateur sorte d'une 
alerte en cliquant sur un bouton radio ! On exclura done des alertes tout contrfile 
autre que les simples boutons. Et une ligne editable muette ? Elle ne generait pas, 
mais 1'application serait incapable de lire son contenu avant sa destruction ! Done, 
regie absolue : une alerte ne contient que des boutons et du texte statique, 
eventuellement parametre. 

Voici un exemple tout simple d'alerte. Elle affiche le message « Vous allez ddtruire 
tout votre repertoire » et deux boutons. « D'accord » et « Pas d'accord ». C'est 
evidemment le bouton « Pas d'accord » qui est pris par defaut. Pas de fioriture 
particuliere : deux « bips » et affichage de la fenetre quel que soit le niveau (qui sont 
tous egaux, valeur binaire 11000010, soit C2 en hexadecimal). 

ItemTemptote boutonl = { 1 . {50, 10, 70, 1 10), Buttonltam. "VI D'accord", 0, 2, 0L ): 
ItamTempiate bouton2 . { 2, (50, 130, 70, 240). Buttonttsm, "\14Pas d'accord", 0, 2, 0L ); 
dwstij] -"\51Vous allez detruireVtout voire repertoire"; f sur 2 lignesl 7 

ItomTemptatB textalerte - ( 3, (1 0, 1 0, 40, 230). SrafTart + ItemDisable, str, 0, 0, 0L }: 
AlertTemplatB attention - { 
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(40.30.120,290}, 

1, 

0xC2, 0xC2, 0xC2, 0xC2, 

{ fiboutonl, 

SboutonZ, 

fitextaferte, 

0L} 

>; 



r rectangle contenu de la fenetre " 
f* identifiant de I'alerte */ 
r les quatre niveaux d'alerte */ 
I" adresse du premier item */ 
T adresse du deuxieme item 7 
f adresse du troisieme item 7 
r il n"y a plus d'item */ 



item = Alert(8atteni'on, 01); t tout sa (ait avec cette instruction unique 7 

if {item =. 1) destructfon_du_repertoire( ); 

Derriere 1'appel a la fonction Alert, un seul test est suffisant : si item vaut 1, 
l'utilisateur a clique sur le bouton « D'accord » et on execute la commande. Sinon, on 
n'a rien a faire puisqu'il n'est plus d'accord ! La valeur retournee ne pourra jamais 
etre egale a 3, puisque le troisieme item a ete declare^ muet. 

La fonction Alert possede trois variantes, de fonctionnement absolument identi- 
que. La difference tient dans le fait qu'elles dessinent en plus des items declares par 
l'application une icone pred^finie dans le coin haut gauche de la fenetre, Ces fonctions 
s'appellent Stop Alert, NoteAiert et Caution Alert 



© m 



a 



Stop 



Figure 1X.4. Les ktines pr&ttflntts. 

Une quatrieme variante est prevue : Talk Alert . qui prSsentera de plus la 
particularity de purler : elle Snoncera d'une voix synthetique les textes statiques de 
I'alerte. 

Citons enfin les deux routines qui permettent de controler le niveau d'une alette. 
Nous avons dit que ie Dialog Manager stockait dans un coin I'identifiant de la derniere 
alerte appelee (ainsi que son niveau d'appel). A 1'appel d'une nouvelle alerte, si 
I'identifiant est identique, il s'agit d'une alerte consecutive, et le niveau est 
increments, sinon le niveau est remis a zero. Ceci est automatique. Mais supposons 
que l'application utilise un seul AlertTemptate pour gerer plusieurs alettes differentes 
(grace aux textes statiques param£trables). Elle peut avoir besoin de gerer elle-meme 
le niveau d'une telle alerte. 

La procedure ResetAlertStage, sans argument, fera en sorte que la prochaine alerte 
sera traitee a son premier niveau. La fonction GetAlertStage, sans argument non plus, 
retournera le niveau actuellement stocke par le Dialog Manager (entier compris entre 
et 3, signifiant premier niveau et 3 quatrieme niveau). 



Utilisation d'un modeless dialog 

La creation d'un modeless dialog se fera par la fonction NewModelessDinlog, dont 
les six arguments vont permettre de creer une fenetre classique, avec les centrales 
habituels lies aux fenetres : 

- un pointeur sur le rectangle definissant la region contenu de la fenetre a la 
creation (PortRea du grafport assorie) ; 

- un pointeur sur le tit re de la fenetre de dialogue {chaine de type Pascal) ; 

- un pointeur sur la fenetre derriSre laquelle sera cree le dialogue (passer la valeur 
— IL pour que le dialogue soil cref; au premier plan) ; 
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- un entier ddcrivant la region contour de la fen6tre (done les controles assoeies, 
champ wFrame) ; 

- un entier long d'utilisation libre pour 1'application (champ wRefCon) ; 

- un pointeur sur le rectangle definissant la region content] de la fenetre apres un 
zoom, necessaire si la case de zoom est prSsente (passer zero-long sinon). 

Voir le chapitre consacre au Window Manager pour avoir plus de details sur ces 
arguments, notamment la position des bits permettant la definition des controles dans 
sa region contour. 

La fonction NewModelessDialog retourne un pointeur sur dialogue, qui servira de 
maniere identique au pointeur retourne par New Modal Dialog Une fois la fenetre 
creee, on lui ajoute des items, grace aux procedures GetNewDItem ou NewDItem vues 
plus haul. 

Une fenetre de modeless dialog est une fenetre classique, qui peut passer derri£re 
d'autres fenetres. II y aura done des ev£nements d'activation et de mise a jour a gSrer, 
mais heu reuse me nt, e'est le Dialog Manager qui va s'en occuper. Quand une 
application manipule des fenetres de modeless dialog, elle doit appeler la fonction 
lsDialogEvent juste apr£s avoir appeie GetNextEvent ou Task Master En argument, le 
pointeur sur 1'evenement qui vient d'etre alimente par ces routines. Cette fonction va 
determiner si 1'evenement doit Stre traits par le Dialog Manager comme intervenant 
dans une partie du dialogue : evenement d'activation ou de mise a jour de la fenetre 
de dialogue, clic-souris ou touche enfoncee si la fenetre de dialogue est active, Dans ce 
cas, lsDialogEvent retourne TRUE. Si 1'evenement n'a rien a voir avec le dialogue, la 
valeur retournee est FALSE. 

Si la reponse est FALSE (done egale a zero), 1'application gere son Evenement de 
manure normale, tel que cela a ete vu dans la boucle d'ev^nement. Si la reponse est 
TRUE (done differente de zero), 1'application appellera la fonction DialogSelect 
(apres avoir eventuellement execute quelques instructions propres, equivalentes par 
exemple, a ce qu'aurait fait la fonction filtre dans un modal dialog). 

DialogSelect reclame trois arguments, trois pointeurs : 

- un pointeur sur 1'evenement auquel on r£pond (identique a celui de IsDialogE- 
vent) ; 

- l'adresse de la variable dans laquelle DialogSelect va stocker le pointeur sur 
dialogue concerns ; 

- l'adresse de la variable dans laquelle DialogSelect va stocker le pointeur sur 
I'item concern e. 

Si 1'evenement concerne un item non muet dans un dialogue actif (la fenetre de 
modeless dialog etait active quand 1'evenement est survenu), DialogSelect retourne 
TRUE apres avoir alimente les variables donnant le pointeur sur dialogue et 
Fidentifiant de I'item concernes, pour permettre h 1'application de g£rer cet 
ev6nement. Dans tous les autres cas, DialogSelect retourne FALSE et 1'application n'a 
rien a faire (un item muet a ete utilise, un Svdnement d'activation/d^sactivation ou de 
mise a jour est intervenu, une touche a ete enfoncee alors qu'il n'y a aucune ligne 
Editable dans le dialogue, etc.). 

Quand le dialogue contient des lignes editables, les fonctions lsDialogEvent et 
DialogSelect doivent toujours Sire appeiees apres GetNextEvent ou TaskMaster, 
raerae si ces fonctions retournent 1'evenement nul, afin de permettre au point 
d'insertion de clignoter si le dialogue est actif (ce sont ces fonctions qui appellent la 
procedure de Line Edit LEIdle). 

Quatre procedures peuvent £tre utilises quand le dialogue contient des lignes 
6ditables, pour repondre aux commandes d'edition de texte Cauper, Copier, Collet et 
Effacer. Ce sont DlgCut, DlgCopy, DlgPaste et DlgDelete, dont le seul argument est un 
pointeur sur le dialogue. Ces procedures agissent sur la ligne editable selectionnee, en 
appelant les procedures de Line Edit LECut, LECopy, LEPaste et LEDelete. C'est 
done le presse-papiers prive' de Line Edit qui est utilise. 
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Pour de^allouer la fenetre de dialogue et ses items, on proc£dera comme pour un 
modal dialog. 

La gestion d'un modeless dialog aura done a peu pres cette allure : 

TaskRec tache; f un evenement 7 

Pointer dig; /* pointeur sur le datogue 6vemuellemenl utilise 1 */ 

int it: I* litem eventuellement invoquS 7 

if (IGetNextEvenUfcverfEVenf, Stache)) continue; 

if (IsDialogEvent(Stache)) /* si lev^nernent concerns un modeless dialog ... 7 

if(DialogSelect(& tache. Sdlg, &item)) f ...et si le Dialog Manager ne peut pas le gerer... 7 

f ... on repond a litem it du dialogue dig renvoye 7 
} 
else ... T reponse classique a I'evenement, qui ne conceme pas un dialogue 7 



Gestion des items 

Les routines que nous aliens voir dans ce paragraphs s'appliquent a tous les items, 
qu'ils appartiennent a un dialogue ou une alerte (quand e'est possible). Elles 
permettent de eonnaitre ou de modifier les caractgristiques d'un item dont 1'identifiant 
et la fenetre d'apparte nance sonl donnas. Seul 1'identifiant ne peut pas Stre modifie. 
Dans les exemples qui suivent, nous ne r£p£terons pas les declarations suivantes : 

Pointer dig; /* pointeur sur dialogue 7 

int item; f jdentifiant de litem considers 7 

• On peut eonnaitre le type d'un item grace a la fonction GetltemType, qui 
retourne Tune des constantes pred£finies vues plus haut. La procedure SetltemTvpt 
permet de changer le type de I'itero, son utilisation est a proscrire absolument. 

int type; 

type - GetltemTyp&fdlg, item); /* retourne le type de litem 7 



• On peut eonnaitre et changer le rectangle d'affichage d'un item, grace aux 
procedures GetltemBox et SetltemBox, Dans les deux cas, le rectangle sera manipule 
par Pintermediaire de son adresse, en troisieme argument. Sauf effets spe'eiaux, on 
evitera de modifier la taille ou la localisation d'un item. 

fleet r; r un rectangle 7 

GetItemBoX(dlg, item. &r); f on recupere le rectangle a Tadresse indiquee 7 

lnsetRect(&r, -10,0); r on I'elargit de 20 points 7 

SetltemBoxfdlg, item, &r); r litem a une nouvelle taille 7 



• On peut eonnaitre la valeur actuelle d'un item grace a la fonction Getltem Value et 
changer la valeur d'un item gr^ce a la procedure SetltemValue. Pour les eontroies 
standard, la valeur de l'item est vraiment la valeur du eontrole. Pour les types propres 
au Dialog Manager, les valeurs peuvent avoir un sens particulier ou etre libres 
d'utilisation. Ce sont ces routines qu'il faudra utiliser pour les gerer. 

Exemple de gestion des cases a cocher et des boutons radio, conforme a ce que 
nous avons deja vu dans le chapitre consacre au Control Manager, 
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inl val, type: 

item - ModalDl8lOg(0L}; r on est dans un modal dialog V 

type = GetltemType(dlg, item}; /* quel est lo type de ('item choisi? */ 

swilch(type) 

{ 

case Checkitem : r est-ce une case a cochef? */ 

val - GetltemValue(d]g, item); 

Set Item Val ue{1 - val, dig, item); r oui, on change sa valeur */ 
r ou bien: SetltemValueflval, dig, item); */ 

break; 

case Radioltem : 

SetItemValue{1 , dig, item); /* oui, on change sa valeur 7 

break; 
) 

r et on boucle! 7 

Notons un point important : la procedure Setltem Value redessine ['item des que la 
valeur est fix£e, done les controles standard pnSsenteront leur aspect tel qu'il decoule 
de leur valeur. Si un utilisateur clique dans une case a cocher et que la valeur de cette 
case n'est pas modified, il n'y aura rien de visible a I'ecran ! De meme, la modification 
de la valeur d'un bouton radio provoque le redessin de toute la famitle a laquelle il 
appartient. 

• Pour rendre visible ou invisible un item, on utilisera les procedures ShowDItem et 
IlideDItem. Ouand un item est rendu invisible, il reste dans la liste des items mats il 
n'apparait plus dans la fenetre et ne peut etre atteint par I'utilisateur. La procedure 
HidtDltem ne fait rien si I'item considere" est deja invisible. La procedure ShowDItem 
tie fait rien si I'item considere est deja visible. 

HldeDltem(dlg, item); /* on rend I item invisible 7 

ShowDltem(dtg, item); f" on rend I'item visible 7 

Rappelons qu'un item peut etre ditruit par Removeltem plutot que rendu invisible 
s'il n'a aucune chance de reapparaitre avant la fin du dialogue. 

• Pour rendre muet un item, on pourra utiliser la procedure DisableDItem II ne se 
passe rien si I'item est deja muet. Pour rendre parlant un item, on pourra utiliser la 
procedure EnableDltem. II ne se passera rien si I'item est deja parlant. Dans les deux 
cas, rien ne vient modifier 1'aspect visuel de I'item. 

Disab1eDltem(dlg. item); f on rend i'item muet 7 

EnahleDllem(dlg, item) ; f on rend litem parlant 7 



Sauf cas particulier, ces deux procedures n'auront pas a etre appel^es. En effet, un 
item est cr£e muet ou non, et il n'y a pas beaucoup de raisons pour que cet Stat doivent 
changer subitement ! 

• Aucune routine du Dialog Manager ne permet de desactiver et reactiver un 
contrfile standard dans une fenelre de dialogue. II faudra done utiliser la routine 
HiliteControl du Control Manager en cas de besoin. Mais cette routine reclame en 
argument un handle sur le controle vis£ ! Pour connaitre le handle d'un contr6le 
appartenant a un dialogue, on utilisera la fonction GetConlrolItem. 
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r handle sur controle */ 



hdl = GetCon troll tern (dig, item); r on recupere le handle */ 
HiliteControl(255, hdl); C I'item est desactive 7 



HMit«Control(0, hdl); 



r I'item est reactive "/ 



Cet exemple mis a part, on se gardera bien de faire n'importe quoi en utilisant 
directement le Control Manager. En effet le Dialog Manager utilise certains champs 
de maniere non standard, et on pourrait perdre des informations essentielles en 
manipulant urt peu trop directement certains items. II est toutefois permis (puisqu'il 
n'y a pas d'autre solution) d'aller manipuler la couleur des cont roles directement, 

• Nous avons dit que les textes statiques pouvaient etre parametres en leur incluant 
les caract&res spficiaux *0, "1, "2 et "3. La procedure ParamText permet de donner les 
chaines de caracteres qui se substitueront aux caracteres spe'ctaux lors de 1'affichage 
des textes statiques. Elle admet quatre arguments : quatre pointeurs sur chaine de 
caracteres type Pascal donnant les substitutions. Ces chaines seront eventuellement 
vides. 



char (ichstr[17); /■ reserve de la place pour le nom de fichier */ 

char repstr[65]; /* reserve de la place pour le chemin d'acces */ 

P le texte statique a afficher (chaine Pascal) 7 
char statstr( ] - "\66l_e fichieiV^OsArest introuvable\rdans le repertoire^lV"; 

T I'utilisateur a demande un nom de fichier, ce nom est ecrit a I'adresse fichstr 7 
.'" I'application verifie I'existence du fichier dans le repertoire en cours (appel ProDOS) 7 
I" elle ne le trowe pas, elle ecrit le pathname a I'adresse repstr, et... '/ 
ParsmTaxt(fichstr, repstr, OL, OL); /* parametrage du texte slatique 7 



Le fichier 

<T ar Z amp i on > 
est introuvable 
dans le repertoire 

NMonDisqueNMonSousRep 



Figure IX,5, Ce que cela pourrott 



Rappelons que les caracteres de retour a la ligne sont permis dans les textes 
statiques. Us correspondent au code ASCII 13 en decimal, encore code \r en 
langage C. Pour calculer la longueur de la chaine contenant le texte param£tre, on 
compte chaque caractere pour 1, la combinaison \r pour 1, et les combinaisons de 
type '0 pour 2. II est consetlie de terminer la chaine par un caractere de retour a la 
ligne, surtout quand d'autres re tours k la ligne figurent de'ja a I'interieur. 

Remarque Le Dialog Manager conserve la trace des quatre adresses dans un coin 
de sa mSmoire, Si la procedure ParamText n'est pas rappel£e lors d'un affichage 
ulterieur d'un texte statique qui fait appel a des substitutions, les anciennes adresses 
seront utilisees. Si entre-temps elles ont servi a stocker autre chose (si par exemple les 
chaines ont ete declarers variables locales), des caracteres plus que bizarres risquent 
d'apparaitre dans le texte statique concerne ! On peut passer z£ro-long dans 1'un des 
arguments, si I'adresse correspondante sur laquelle pointait prec£demment Param- 
Text doit etre conserved ou si le parametre n'est pas utilise. 

• Interessons-nous maintenant aux items de type ligne editable. Si nous demandons 
la valeur d'un tel champ, nous obtenons le nombre precise au mument de la creation 
de I'item, qui designe le nombre maximal de caracteres que I'utilisateur pouna saisir 
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dans cet item, et en aucun cas les caracteres eux-memes. Pour obtenir cette chaine de 
caracteres (style Pascal), il faudra s'allouer la m^moire necessaire pour la recevoir, et 
appeler la procedure GetlText. Pour allouer la memoire necessaire, le plus simple sera 
de declarer une chaine de longueur m + I (si m designe le nombre maximal de 
caracteres autorise), le caractere supplemental servant a accueillir le nombre exact 
de caracteres en debut de chaine Pascal, 

char editstr[1 7]; f on reserve 17 octets pour la chaine, assume m-1 6 V 

GetlTextfdlg, item, editstr); /* la chaine est recopi6e a I'adresse editstr */ 

Event ue Dement, cette procedure peut servir a retrouver le contenu d'un teste 
statique, mais c'est nettement moins utile ! 

Du point de vue de l'application, on peut egalement mettre du teste dans une ligne 
editable ou un texte statique, pourquoi pas, si la possibility du parametrage ne suffit 
pas (c'est interessant, par exemple, pour afficher en clair la valeur prise par une barre 
de defilement i. 

Supposons que l'application autorise I'utilisateur a taper les premieres lettres d'un 
texte, et complete elle-meme le texte par defaut en tenant compte de ces premieres 
lettres (un moyen elegant et pas trop couteux pour proposer un choix, 1'autre moyen 
Elegant etant de proposer une liste dans une fenetre avec barre de defilement et choix 
par double-clic). Pour afficher ce texte par defaut, la procedure SetlText sera utilise*. 

char editstr(17]; /* on reserve 17 octets pour la chaine, assume m.16 */ 

GeMTextfdlg, item, editstr): P les premieres lettres sont recuperees */ 

r l'application calcule sa chaine par delaut et la place a I'adresse editstr V 
SettT«xt(dlg, item, editstr); f la chaine est affichee '/ 

Continuons sur I'exemple precedent. L'utilisateur a tape quelques lettres, l'appli- 
cation a complete son texte. Mais si le choix n'etait pas unique ? II serait agreable a 
l'utilisateur de n'avoir qu'a taper une lettre supplemental pour faire un nouveau 
choix. C'est possible si ['application lui rend la main aprfcs avoir selectionne' la partie 
du texte qu'elle a complete elle-meme, laissant normal ce que lui a saisi. La procedure 
SellText permet cela. Si nous poursuivons notre exemple, et en admettant que 
l'utilisateur a saisi trois caracteres, on ecrira : 

SellText(dlg, item, 3, 256); /* tous les caracteres apres le troisieme seront inverses V 

|"chrEHH5a | 

Le troisieme argument de SellText correspond au debut de la selection (les 
positions debutcnt a la valeur zero et tombent entre les caracteres, done la position 3 
se situe entre les troisieme et quatrieme lettres). Le quatrieme argument correspond a 
la fin de la selection. Si la valeur de fin est plus grande que le nombre de caracteres de 
la chaine, peu importe : la selection ira jusqu'au bout du texte, sans plus. C'est le cas 
dans Texemple, une ligne editable ne pouvant avoir plus de 255 caracteres. Si les deux 
arguments sont egaux, il n'y a pas de portion de texte selectionnee, mais le point 
d'insertion clignotant est place a la position designee. Et si par hasard aucun texte ne 
se trouvait dans la ligne editable, le point d'insertion serait encore affiche, sans plus, 
au debut du champ. 

• On a dit et repete que si un bouton simple portail 1'identifiant 1 , il etait considere 
dans un dialogue comme le bouton par defaut. Si pour une raison precise, r application 
doit changer le bouton par defaut (par exemple un meme dialogue pouvant etre utilise 
dans deux contextes differents qui necessitent de permuter les boutons par defaut), 
elle le fera avec la procedure SetDeiBution. Et pour connaitre l'identiftant du bouton 
par defaut, on appelle la fonction GetDefButton. Cette fonction retourne zero s'il n'y a 
pas de bouton par defaut. 
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item = GetDef Button(dlg); f item sera vraisemblabiement egal a 1 "/ 

SetDef Button(item+1 . dig) ; f on change le bouton par detaut */ 

item - GetDefButton(dlg): F item vaut maintenant 2 'I 

Attention Le bouton par defaut doit etre un bouton « sur ». Si l'application passe 
un message du style : « Voulez-vous sauvegarder vos donnees avant de quitter ? » et 
qu'il y a trois boutons possibles : OUI, NON et ANNULER, il ne faudra surtout pas 
declarer le bouton NON par d£faut ! Le bouton OUI est un choix meilleur, le bouton 
ANNULER est sans doute le meilleur des choix, puisqu'il oblige l'utilisateur a 
prendre une decision : dans 95 % des cas, ce sera OUl, dans 5 % des cas, ce sera 
NON, mais il vaut peut-etre mieux ne pas lui forcer la main sur ces 5 % la. 
Remarquons au passage la clarte du message : la question ne doit occasionner aucune 
ambiguite I 

• Supposons qu'on veuille connaitre tous les identifiants d'une liste d'itsms (peu 
importe qu'ils soient muets, inactifs ou invisibles, ils font partie de la liste), on a pour 
eela deux fonctions, GetFirstltem et GttNextltem. Gageons que peu nombreuses 
seront les applications qui utiliseront ces fonctions ! Si un dialogue contient les items 
8, 3 et 6, dans cet ordre a la creation, on pourra avoir 1'enchainement suivant : 

item - GerFlrstltem(dlg); f item recpit la valeur 8 7 

item = GetNextltemfdlg. item); f item prend la valeur 3 */ 

item = GelNextliem(dlg, item) ; /* item prend la valeur 6 V 

item > GetNextltemjdlg, item) ; /* item prend la valeur '/ 



S'il n'y a aucun item dans la liste, GetFirstltem retourne zero. Si 1'item spScifie en 
deuxieme argument dans GetNextltem est le dernier de la liste, cette fonction retourne 
egalement zero. 

• Pour savoir si un point, donne en coordonnees globales, appartient a un item d'un 
dialogue particulier, on peut se servir de la fonction FindDItem, qui retourne 
l'identifiant de Titem ou zero si le point n'est inclus dans aucun item ou se trouve a 
l'ext^rieur de la fenetre de dialogue. Cette fonction n'a pas de grandes raisons d'etre 
employee par une application. 



Exemple complet : un modal dialog 

L'exemple suivant est destine a manipuler un certain nombre de routines offertes 
par le Dialog Manager. II n'a pas grande application pratique, puisqu'il est limite a la 
saisie de neuf fiches, mais il contient les bases de ce que pourrait etre un ecran de 
saisie d'un institut de sondage. On va entrer un code (compris entre 1 et 9) dans une 
ligne editable, ce code correspondant a un enregistrement dans une structure de 
donn^es qui memorise un identifiant, le statut matrimonial, le sexe, ['age, le nombre 
d'enfants (garcons et filles). 

L'enregistrement sert d'enregistrement par defaut, on n'a done pas le droit de le 
modifier. Si 1'utilisateur entre le code 0, une alerte est affich^e. S'il entre un autre 
code, les donnees assoriees & cet enregistrement sont affichees dans les differents 
items : ligne editable pour l'identifiant, famille de boutons radio pour le statut, autre 
famille de boutons radio pour le sexe, barre de defilement pour 1'age. Une case a 
cocher est egalement pr^sente : si la personne a des enfants, elle est coch£e et 
apparaissent en dessous deux lignes editables (nombre de garcons, nombre de filles). 
Si la personne n'a pas d'enfant, la case n'est pas cochee, et les lignes gargons et filles 
sont invisibles. 

L'utilisateur pourra modifier les donnees associees a un code, et les mettre en 
memoire en cliquant sur le bouton Ajouter (bouton par defaut) Dans ce cas, le champ 
identifiant ne devra pas Stre vide, sinon une alerte est affichee. L'utilisateur pourra 
egalement supprimer l'enregistrement, par le bouton Supprimer, Enfin, il pourra 
visualiser ce qu'il a saisi, en cliquant sur le bouton Quitter (ou en faisant Pomme-Q, 
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equivalent-davier defini pour ce bouton dans tine function filtre). Dans ce cas est 
affiche un dialogue secondaire, avec deux boutons, l'mi permettant de revenir a la 
saisie, I'autre de quitter d£finitivement 1'application (aucun bouton par deiaut). 
L'exemple montre done comment on peut passer d'un dialogue a un autre, puis 
revenir. 

Tous les evfinements clavier du dialogue principal sont intercepts par une fonction 
filtre, qui non seulement d6fin.it I'equivalent-clavier Pomme-O, mais aussi empeche la 
saisie de tout caractere different des chiffres. Quand l'utilisateur tape un caractere non 
valide, une alerte est affichee. Le filtre standard est egalement utilise, ce qui permet le 
copier-coller entre lignes editables, et le caractere Retour en equivalent du bouton par 
defaut. 

Dans la bane des menus est affiche en permanence I'identifiant du dernier item 
renvoye par la fonction Modal Dial or, ainsi que son type. 

Cet exemple a 6x6 mis au point avec beaucoup de mal : il semble bien que dans sa 
version 1.01, le Dialog Manager soit encore ttche avec les lignes editables et meme les 
textes statiques. Cela est Evident quand on introduit des couleurs dans les controles 
standard. Les textes affichSs ensuite deviennent multicolores, alors qu'on ne leur a 
rien demands ! Plusieurs autres bogues, plus graves, ont ete mis a jour, mais ces 
defauts de jeunesse seront sans doute repares quand vous lirez ces lignes. 

Remarquons qu'un dialogue avec des lignes Editables provoque souvent le besoin 
de convertir des chaines de caracteres en nombres et reciproquement. Nous avons 
plusieurs fois joue sur le fait que le Dialog Manager manipule des chaines de type 
Pascal (oil le premier caractire donne la longueur de la chaine). Nous avons 
egalement jou£ sur les caracteres comme le langage C nous le permet : puisque 'a' 
designe le code ASCII du caractere a minuscule, 'a' + 1 designe le code ASCII 
suivant, done le caractere b minuscule, et ainsi de suite. La condition car<'0' || car>'9' 
assure que le caractere contenu dans la variable car n'est pas un chiffre. 



ModalDialog: 1M - GetltemTttpe: 11 



Code [T] 

O Celib. 
<S> Marie 
O Divorce 
O Veuf 



nID | 1551113001071 
ftge l^> 



Rjouter 



31 



<S> Masculin 
O Feminin 

EE3 Infants 
Garcans | 2| | 
Filles \0 



Supprimer 



Quitter 



figure IX. 7. L'&nui df rexemple 



#include <tools.h> 
#indude <entete h> 



#define mode 



Defile me nt(); 
monFiltref ): 



f definition des termes en gras 7 
f definition des termes en italique 7 

T si mode 320. 1 si mode 640 '/ 

f fonction d'action pour une barre de defilement V 
r filtre pour un dialogue V 
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T couleurs pour les boutons, la case a cocher, las boutons radio et la barre 7 
int colb[ ] ■ {0x20, 0x90. 0x70, OxBD, 0x7 A, 0x00, 0x00); 

int colc[ ] = {0x00, 0x92, 0x97, 0xF0}; 
int coin [ ] = (0x00, 0x92, 0x97, OxFO}; 

int colr2[ ] - (0x00, 0x82, 0x83, OxFO}; 
int cols[ ] - (0x20, 0x97, 0xA2, OxFF. OxCF, OxFF. 0x1 DF, OxFF}; 

f definition du dialogue principal 7 

ItemTemplatB bEnreg-{1 , (1 45.1 0, 1 65,90}, Buttonltem, "\7Ajouter", 0, 2, colb}; 

ItemTemplatB bSuppr-(2, {145,1 10,165,190), Buttonltem, "\1 1 Supprimer", 0, 2. colb}; 

ItemTemplatB bGuit.{3, [ 1 45 ,2 1 , 1 65 ,290} , Buttonttem, "\7Qui tter" , , 2 , col b) ; 

ItemTemplatB stCode={4, {13,10,28,50}, StatText + ItemDisable, "WCode", 0, 0, OL}; 

ItemTemplatB eiCode=(5, (10,50,25,70), EditLine, "", 1, 0, OL}; 

ItemTemplatB stnl D -[6, { 1 3 , 1 00 ,28 . 1 30), StatText + ItemDisable, "\3nlD",O,0,0L); 

ItemTemplam elnl D - (7 , {10,130.25,290}, EditLine + ItemDisable, ~, 1 3, 0, OL} ; 

ItemTemplatB M 1 -{8, {45 , 1 ,60 ,90} , Radioltam, "«Celib.", 1 , 1 , coir 1 ) ; 

ItemTemplatB M2={9, (65,10,80,90}, Radioltem, "\5Marie", 0, I, colrt}; 

ItemTemplatB r13={10, (85,10,100,90), Radioltem, VDhrarcd", 0, 1, colrl); 

ItemTemplatB M 4-{1 1 , (1 05.1 0.1 20,90), Radioltem. M Vasuf, 0, 1 , coiM }; 

ItemTemplatB r21 -{1 2, (35,1 90,50,290), Radioltam. "\1 OMasculin", 1 . 2, colr2) ; 

ItemTemplatB r22-(13, {50,190,65,290}, Radioltem, "\7Feminin", 0, 2, colr2}; 

ItemTemplam cEn(.{14, (73,190.88,290), Checkltem, "\7Enfants", 0, 0, cole); 

ItemTemplatB stGar-(1 5, (98,1 90, 1 1 3.250}, StatText + ItemDisable, 

"\7Garcons", 0, 0x80, OL); 

ItemTamplate elGar={1 6, {95,260,1 1 0,290}, EditLine + ItemDisable, ~, 1 , 0, OL}; 

ItBrnTampla IB stFil -{ 1 7 . (116,195,133,250}, StatText + ItemDisable, "teFilles", , 0x80 , L) ; 

ItemTamplate el Fil ={1 8 , (H 5,260, 1 30,290} , EditLine + ItemDisable, "" , 1 , , L} : 

ItemTempla te stAge 1 •) 1 9 , {40 , 1 1 ,50 , 1 35} , Sta tText + ItemDisable, "\3 Age", , 0, OL} ; 

ItemTampla te sb Age={20, (40,140,135,160}. ScroitBaritam + ItemDisable, 

Defilement, 19, 3. cols}; 

ItemTemplatB stAge2=(21 , {125,1 15,140,135), StatText* ItemDisable, "\00220", 0, 0, 0L}; 

DiahgTemplatB monDial1-{ (20,10,190,310), TRUE, OL, 

(SbEnreg, SbSuppr, AbQuit, SstCode. &elCode, 
istnlD, SeinfD. &r11, &r12, &r13. &M4, Sr21, 4r22, 
ScEnf, &stGar, istFil, &stAge1, SsbAge, &stAge2, 0L)): 
r definition d'une alerte avec texte param6trable */ 

ItemTemplatB bOK-{1 , {1 0,1 40.50, 1 90), Buttonltem, "\20K", 0, 2, 0L}; 

ItemTemplatB stMesI -{2, {45,1 0,60,1 90), StatText + ItemDisable, -\7ERREUR:", 0. O, 0L); 

ItemTemplatB stMes2.(3, (60,10.80,190). StatText + ItemDisable, "\3"0V", 0. 0, 0L}; 

AlertTemplatB mo n Ale rte-{ {40,60 , 1 25 ,260), 1,0x80,0x80,0x80,0x80, 

{ibOK. &siMes1, &stMes2, OL}}: 

T definition du dialogue secondare 7 
ItemTemplata bRev-{2, (145,1 0, 1 65,90}, Buttonltem, "\7Revenir", 0, 2, 0L); 
ItemTemplatB bOut-(3, {1 45,21 0,1 65,290), Buttonltem, VQuitter", 0, 2, 0L}; 

DiahgTemplatB monDial2={ (20,10,190,310}, TRUE, 0L, 
{SbRev, ibbut, 0L}}; 



Pointer 
int 


dig 
ind 




struct Sondage { 

int con; 
char nl0[15l; 
int statut; 


int 




sexe; 


int 
int 
int 




age; 
nbG; 
nbF; 



r pointeur sur le dialogue principal */ 

r indies courant dans notre tableau de donneos '/ 

r la structure manipulee par notre programme '/ 

retatdef'enregistrement(7flt/Eou FALSE)*! 

T I'identifiant de I'individu (chaTne type Pascal) 7 

t* son statut matrimonial '/ 

r son sexe 7 

r son age 7 

f nombre de gareons 7 

r rwmbre de filles 7 
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) ficN»[1 0}; 

/*" 
main() 

my ID; 
i; 



r I'indice ne peut varier que de £ 9 7 
PROGRAMME PRINCIPAL *****/ 



r identifiant de I'application 7 



mylD - debut_app!(mode); 

Flush Even ts(EveryEvent, 0); 

dig . GetNewModalDialog(SmonDiaJI); 

SetPort(GetMenuMgrPort( )) 
SetTextMode(O); 

for (i-0; i<10;++i) 

< 

fiche[il.bon - FALSE ; 
flche[i].nlD[Oj = 0; 
fiche|ij. statu! - 0; 
fiche(i].sexe » 0; 
fiche[i].age = 20; 
1icho[i].nbG - 0; 
ficbe(ij.nbF - 0; 
} 

do gereDiabgue( ); 
while (affieher()); 

CloseDlalog(dlg); 
quitter) my ID); 



r initialisations 7 

T menage dans la file d'evenements 7 

T on ouvre le dialogue */ 

T on va eerire dans la barre des menus.. 
r . . .en mode Copy V 

r initialisation de nos donnees 7 



T gestion du dialogue... 7 

T ...tant qu'on revient de I'affichage 7 



T on lerme le dialogue 
r . . .et on s'en va 7 



{ 

M 

char 



/**"* FONCTION GEREDIALCGUE: gesBon du dialogue principal " 
gere Dialogue! ) 

T item selectionne. son type 7 



litem, letypo; 
msg[S0]; 



do { 



litem = Modal Dialog (0x80000000 | (long) monFiltre); r le standard et le filtie 7 
letype - GetltemTyp«(dlg, litem); r le type de litem a trailer 7 

sprintf(msg,"ModalDialog: %d • GetltemType: %d ", litem, letype); 
Mov«To(40,10); DrawCString(iTisg): r on ecrit dans la barre des menus 7 

switch (letype) 

I 

case Buttonllem: 

if (litem ■== 1) ajotiter(); 

else il (litem --2) supprimerf ); 

break; 



f un bouton simple "/ 



case Checkitem : 

if(litem==14)repEnf(); 

break; 

case Radioltem : 

Set! tern Value(1, dig, litem): 
break: 

case EditLine : 

if (litem — 5} repCode( ); 
break: 



r une case a cocher 7 



r un bouton radio '/ 



r une ligne editable non muette 7 



DIALOG MANAGER I 269 



while (litem 1=3); 



f on arrete de boucler quand le bouton 3 est selection^ */ 



/***** FONCTION REPCODE: action quand un nouveau code est enlre *****/ 



repCode( ) 



char msg(3I; 
int indprov; 

G»tlToxt(dig, S, msg); 

if (msg[0] — 1 8& msg[1] — '0) 



r on recupere le code (chatne Pascal) */ 
P le code a et£ saisi.. . */ 



PsramText("a7Le code OVest interdit!", OL, OL. OL); 
CautionAlertfSmonAlBrte, OL); f ...on affiche une alerts 7 



indprov . msg[0] ? msgll] - '0' : 0; 
if (indprov -- ind && ind !=0) return; 
ind = indprov; 



r le code est traduit en numdrique V 

r s'il n'a pas change, on sort */ 

T sinon, c'est to nouvet indice 7 

/* on va afficher les donnees de cot 



enregistrement 7 

SellText(dlg, 7, fiche[ind].nlD); 

Setlt«mValue(1 . dig. a+fiche[ind]. statut): 

SetltemValue(1, dig, 12+fiche[ind].sexe); 

S»tltemValue(fiche[ind].age - 1 , dig, 20); 

convNP(fiche[ind],age. msg); 

SetlText(dlg, 21, msg); 

S*tltemValue(!(fiche[ind].nbG + fiche[ind].nbF), dig, 14); 

repEnf( ); /* on fait comma si on avail clique dans la case a cocher 7 



) 
Se!IText(dlg, 5, 0. 9): 



r le code est inverse */ 



FONCTION REPENF: action quand la case Enfants est coehee ou non ' 



repEnf( ) 



int val; 
char msg [2]; 

val - GetltemValue(dlg,14); 
SetltemValue(!val,dlg,l4), 
if (val) 

{ 

HldeDltem(dlg,15); 

HideDltemfag.17;, 

R emovel te m(dlg . 1 6) , 

Removeftem(dlg,18); 

fiche[ind].nbG = 0; 

licha[indj.nbF = 0; 

} 
else 

{ 

GeiNewD Item (dig, SelGar); 
GetNewD Item (dig, SelFil); 
ShowDltem(d1g,15); 
ShowDltem(dlg,17); 



r on r^cupfere I'ancienne valeur (TRUE ou FALSE) 7 
f at on Hnverse 7 

r la marque est retiree 7 

r on rend invisibles les textes staliques V 

f on supprime completement les lignes editabJes */ 

r on met I'enregistremant a jour 'I 

r la case est cochee 7 

!* on recree les lignes editables *l 

r on rend visibles les textes staliques 7 
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l* on affiche les do rinses contenues dans I'enregistrement 7 
msg[0) ■ 1 ; msg[1) - '0' + ftche[ind].nbF; 

SetlText(dlg, 18, msg); 

msg[0] - 1 : msg[1] - '0' + fiche[ind].nbG; 

SettTextfdlg, 16, msg): 

) 



char 
in( 



/"'" FONCTION AJOUTER: met a jour I'enregistrement courant dans la structure *""/ 

ajouter( ) 

msg[1S]; 



GetfTMt(dlg, 7, msg); 
if (ind ==0} 



r on recupere te contenu du champ nlD7 
r find ice courant est nul... 7 



ParamText("V30Le code\rest obligatoire I". 0L. 0L, 01}; 
Stop Alort(&mon Ale rte, 0L); r . . .on affiche une alerte 7 

} 
else if (msg[0] — 0) Tie champ nID est vide... V 

{ 
ParamText("\35Le champ nID\rest obligatoire I". 0L. OL OL): 

r ...on affiche une alerte 7 



StopAlert{&rnonAlerte, OL); 

) 

{ 

fichelindj.bon - TRUE ; 
ptocstr(msg); 

sprintf(fiche[indl.nlD, "%s", msg); 
c topstr( f i c he[ ind ] . n I D) ; 
for (i -0; i<4; ++i) 
{ 

if (GetltemVa!u«(d)g, 8+i)) 
{ 

(iche[ind). statu! - i; 
break; 
) 
} 
liche[ind].sexo ■ (GetltemValu»{dlg, 12)) ? : 1; 
fichcjindj.agB = GetltemValuefdlg, 20) + 1 ; 



I" I'enregistrement est marque 1 correct 7 
/* conversion Pascal vers C */ 
r alimentation du champ dans la fiche. . . * 
f . . .retraduite en chalne Pascal 'I 

f on recupere la valeur du statut */ 



if (GetllemValue(dlg, 14)) 

I 

GotfText(dlg, 16, msg); 

fiche[ind].nbG = msg[1] - '0'; 

GetlTextfdlg, 18, msg); 

fiche[ind].nbF ■ msg[1] - '0'; 

} 
ecrandef( ); 
) 



r on recupere le texte 7 
f on recupere I'Sge */ 
r s'il y a des enfants, . . "I 

r ...nombre de garcons */ 
T ...nombre defilles 7 
r on revient a I'ecran par defaut 7 



/*"" FONCTION SUPPRIMER: efface les donnees de I'enregistrement courant 7 
supprimar( ) 



fiche[ind] - fiche[0]; 
ecrandef( ); 



r on met les donnees de I'enreg. dans I'enreg. courant 7 
Ton revient & I'ecran par defaut 7 



<**"* FONCTION ECRANDEF: force I'affichage de I'ecran par defaut ""7 



ecr andef( ) 
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hd - 0: 
SetlTmrt(dlg. 5, ™): 

SelTTe»t(dlg, 5, 0, 0) 
repCode( ); 



T on force I'enregistrementO 7 

r on lores le code a blanc */ 

r on place to point rfinserton dans cette case V 

F on fait comme si un nouveau code avait etc entre *.' 



/*"" FONCTION AFFICHER: reponse au bouton Quitter du dialogue principal ' 
afficher( ) f va ouvrir le dialogue secondare 7 



Pointer 


dial: 


Pointer 


port; 


int 


i, Hag; 


char 


st[4]; 


char 


sx[2]: 


char 


msg[10]; 



T pointeur sur le dialogue secondare */ 
r ancien grafport 7 

f tas quatre statuts possibles V 
I* lea deux saxes possibles */ 



st[0] - 'C-; st[1] - 'M': st[2] = 'D'; st[3l - V 

SKlOJ-'HVsxIll-'F: 

port = GetPort( ); 

HideWindow(dlg): 

dial > GetrJewModalDialog(SmonDtal2); 

SeiPort(dial); 

MoveTo(5,10);DrawCString("Code nID 
for(i-1;i<10;++i) 

( 



/* initialisation des 4 statuts 7 
r initialisation des 2 sexes 7 
f on memorise le gratport oil on ecrivait */ 
r on rend invisible le dialogue principal 7 
r* on ouvre le dialogue secondaire... */ 
I* ...dans lequel on va 6crire directement... 7 
r . . tous les enregistrements marques TRUE 7 
Statu! Age Sexe nbG nbF"): 



if (!fiche[i].bon) break; 

sprintf(msg. "%oT, i); 

MoveTo(5,10*(i+2)); DrnwCString(msg); 

MoveTo(25, 1 0*(i+2)) ; DrawStr1ng(fiche|i].n1D) ; 

M oveTo (1 42 J 07J+2}} ; DrawCha r(st[fiche [i] . statut]) ; 

sprintf(msg, "%d", fie he |i] .age); 

MoveTo(1 67, 1 07, i+2)) ; DrawCString(msg) ; 

M oveTo(2 1 , 1 0*(i+2) ) ; DrawCh sr{sx[tiche[i] .sexe]) ; 

sprintf(msg, "%d", fiche[i].nbG); 

Mov»To(240,10'(i+2)); DrawCString(msg); 

sprintf(msg, "%d", Hche[i],nbF); 

MoveTo{270,1 0*(i+2)); DrawCStr1ng(msg}; 

) f (in de la page cTecrirure 7 



flag - (ModalDialog(OL) = 
Cl03*Dia!og(diaJ] 
SetPort(port); 
if (flag) 

{ 

ShowWlndow(dlg); 
ecrandef(); 
} 
return flag; 



• 2) ? TRUE : FALSE : /* dans quel bouton Tutilisateur a clique 7 
T fermeture du dialogue secondaire */ 
r on retablit le grafport precedent 7 
f si on doit revenir au dialogue principal. . . 7 

r on lui rend sa visibility .. . 7 

/* .. ,et on revient a I'ecran par d^faut 7 

r on retourne TRUEou FALSE'/ 



r"" FONCTION DEFILEMENT: sera appelee automatiquernent 

des que la bar re sera sollicitee *****/ 



pascal in l Defilement{comm,dialg,id) 

comm; 
inter dialg; 
id; 



f code de la commando "/ 

T pointeur sur dialogue courant */ 

r identifianl de la barre V 
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val; 
ir msg(4]; 

switch(comm) 
{ 
case 1: 

return 1 ; 

break: 



r on repond 4 quelle commands */ 



f taille de ce qui est vu 7 

t I'age varie annee par annee ' 



case 2: 

return 99; 
break; 



r taille de ce qui est manipule 7 
F on gere jusqu'a 99 annees V 



case 3: 

return 19; 
break; 



r valeur a I'initialisation 7 
f on commence a 1 an, done 19 correspond a 20 ans 7 



case 4: 

val m GedtemValuefdialg, id) - 1 ; 
if (val < 0} val - 0; 
convNP(val+1 , msg), 
SetfText(dia!g,21.msg); 
return val; 
break; 



f defilement vers le haul (flfcche) */ 
r ancienne valeur dont pn retire 1 */ 
r on se borde 7 

f conversion en chains Pascal 7 
r affichage de I'ige en clair 7 
T on retourne la nouvelle valeur 7 



case S: /* defilement vers le bas (flee he) 7 

val - GetltemValue(dialg, id) + 1 ; r ancienne valeur a laquelle on ajoute 1 V 

if (val > 98) val -98: 

convNP(val+1 , msg); 

SetlText(dialg. 21 , msg); (• idem 7 

return val; 

break; 

case 6: /• defilement vers le haut (bande) 7 

val - GetltemValue{dialg, id) - 10; r ancienne valeur dont on retire 10 7 
if(valcQ)vaJ*0; 
convNP(val+1, msg); 

S«HText(dialg, 21 , msg) ; r idem 7 

return val: 
break: 



case 7: r defilement vers le bas (bande) 7 

val = Get[temValue(dialg, id) + 10; P ancienne valeur a laquelle on ajoute 10 7 

if (val > 98) val = 98; 



convNP(val+1 , msg); 
SetfTextjdialg, 21 . msg); 
return val; 
break; 



f idem 7 



case 8: 

val a G e litem Val ue(dialg, id); 
convNP(val+1 , msg); 
SetfText{diatg, 21, msg): 
return val; 
break: 



f utilisation du curseur 7 

f nouvelle valeur. qu'on ne louche pas */ 



'" FONCTION MONFILTRE: filtre tous les evenements clavier 

dans le dialogue principal "**7 

pascal kit monFiltre(dialog, event, itemHit) 
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Pointer dialog; /* le dialogue courant 7 

TaskRec 'event; /* pointeur sur fevenement courant 7 

int "itemHit; /* 4 forcer quand on retourne TRUE'/ 

{ 

int car; 

char msg[30]; 

T on laisse le Dialog Manager gerer les evenements autres que les evenements clavier '/ 

if (event->tv/raf !- KeyDown && event->wnaf I- AutoKey) return FALSE ; 

car = ev@nt->message & OxFF; /* code ASCII du caraclere tape 7 

if (car » 0x06 r conlrfile-F '/ 

|| car — 0x08 r fleche gauche 7 

|| car » 0x09 T tabulation 7 

II car =-= OxOD f* retour 7 

II car ~ 0x1 S r fleche droits 7 

II car =-0x1 8 /* clear 7 

j| car »» 0x1 9 f contr6le-Y 7 

II car — 0x7F) /* effacement 7 
return FALSE; /* on laisse le Dialog Manager gerer tous ces caracteres */ 

if (event->mod/7iers S AppleKey) /* la touche Pomme est-elle enfoncee? 7 

1 
if (car — 'Q" || car — 'q") I" lutilisateur a tape Pomme-Q ou Pomme-q. „ 

! 

*itemHit = 3; P ...e'est equivalent a avoir clique dans I'item 3... 7 

return TRUE; F ...eton empeche le DM de gerer Iev6nement 7 

) 
else return FALSE: /* on laisse le DM gerer les autres combinaisons Pomme 7 

) 

if (car<'0' || car>'9') f si ce n'est pas un chiffre. . . */ 

i 

ParamTextC%47Vous ne pouvez^entrer que des chiffres!",0L,OL,0L); 
NoteAlert(8rnonAlerte. OL): f , on affiche une alerte. .. 7 

event-> what ■= ; t . . et on transforme I'evenement clavier en evenement nul */ 

) 
return FALSE: /* on laisse le DM gerer las bons caracteres 7 



/*"" FOMCTION CONVNP: conversion dun rtombre en chatne Pascal **"*/ 

convNP(nbre.pstr) 

int nbre; /* le nombre a convert! r 7 

Pointer pstr; r ladresse ou stocker la chains 7 

[ 

sprintf(pstr, *%d", nbre); f conversion du nombre en chaine C 7 

ctopstr(pstr); I" conversion de la chaine C en chaine Pascal 7 

) 



CHAPITRE X 



POUR QUELQUES 
OUTILS DE PLUS 



Dans ce chapitre, nous evoquerons quelques outils supplemental, sans preten- 
dre a etre exhaustif. Les routines eroquees pouvant etre d'un grand interet, il aurait 
ete dommage de les laisser de cote sous prStexte qu'elles n'entraient pas dans le cadre 
des chapitres pr£c€dents. 



MISCELLANEOUS TOOLS 

Les Miscellaneous Tools regroupent, comme le nora permet de le supposer, 
diverses routines sans lien apparent, toutes en ROM. Par exemple les quatre 
procedures qui vont lire et ecrire dans les 256 octets de memoire vive sauvegardtSe par 
pile (Battery Ram) ; les deux procedures permettant d'installer et de retirer une 
fonction s'ex£cutant en tache de fond a chaque interruption VBL ; les routines gerant 
les erreurs systeme, au nom evocateur de System Death Manager ; les deux routines 
gerant le compactage des images ; la fonction Munger, qui permet certaines 
manipulations d'octets dans des chaines d'octets, etc. 

Nous nous contenterons de d^crire une procedure qui permet de lire 1'horloge de 
l'Apple IIGS, en donnant un resultat lisible presque directement. 

La procedure ReadAsciiTime renvoie la date et 1'heure dans une chaine de 
20 caracteres dont 1'adresse est passSe en argument. Deux pieges a contourner. 
Premierement, chacun des caracteres a son bit le plus significatif a 1, ce qui est 
incessant quand on fait du texte dans les anciens modes de resolution Apple II, mais 
plutdt genant en application desktop : il faut remettre ce bit a pour obtenir un 
rdsultat lisible. Deuxiemement, la chaine de caracteres contenant le resultat n'est ni 
une chaine Pascal ni une chaine C : les 20 caracteres sont significatifs. 

L'exemple suivant montre comment afficher 1'heure exacte en permanence a 
1'^cran. 
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char date[20); 
inl j; 

do( 

ReadAscM71me(date); r on lit la date et Iheure 7 

for(j=0:j<20:++j) 

f 

datep] S= 0x7 F; f force a Is bit significant *,' 

MOV«TO(40.40); 

DrawText(dala, 20); f dessin de 20 caracteres (ormant un texts */ 

I 
} 
while (! Button (0)); I* tant que Is bouton nest pas enfoncfi */ 

Le format de sortie est identique a celui que I'utilisateur a choisi dans l'accessoire 
de bureau Tableau de Bord. Un bon Francais aura choisi JJ/MM/AA HH;MM:SS, 
ou HH varie de a 23. Un Anglo-Saxon utilisera peut-Stre MM/JJ/ 
AA HH:MM:SSxx, ou HH varie de 1 a 12 et xx prend la valeur AM ou PM. Six 
format sont possibles (3 variantes pour la date, 2 pour l'heure). 

Remarque L'accessoire de bureau Clock (voir figure X.l) est une illustration 
parfaite de la procedure ReadAsciiTime 



Figure X.l. A L'horloK*, II est mini] II I 



DESK MANAGER 

Nous avons deja evoqu£ plusieurs fois certaines routines du Desk Manager tout au 
long de cet ouvrage. Nous n'entrerons pas dans les details de I'gcriture d'un accessoire 
de bureau, mais nous allons dgcrire les routines permettant a une application de les 
utiliser. De mgme, nous ne donnerons pas d'exemple complet d' utilisation, puisque 
deux exemples ailleurs dans Touvrage gerent completement lesdits accessoires (voir le 
chapitre V sur le Window Manager et le chapitre XI sur TaskMaster). 



Accessoires classiques et nouveaux accessoires 

II existe deux sortes d'accessoires de bureau sur 1'Apple IIGS : les accessoires de 
bureau classiques et les nouveaux accessoires de bureau. 

• Les accessoires classiques toument dans un environnement qui n'est pas base' sur 
le concept de desktop et d'£v£nements. lis interrompent le d£roulement de ('applica- 
tion qui les appelle, sauvegardent 1'environnement, installent leur propre environne- 
ment (g^neraiement un eeran mode texte 40 ou 80 colonnes), font ce qu'ils ont a faire, 
puis restaurent 1'environnement de l'appiication et lui rendent la main. Quand 
I'utilisateur appuie sur la combinaison de touches Pomme-Contr61e-Eseape, un menu 
contenant la liste des accessoires de bureau classiques est affichi. Le menu se compose 
automatiquement : tout fichier ProDOS de type SB9 present dans un dossier 
particuiier de la disquette systeme sera ajoute a la liste ('/system/desk. aces). 
Remarque Le Tableau de Bord et l'accessoire Affichage Alternatif sont residents dans 
le systeme. Jusqu'i onze accessoires suppl£mentaires peuvent etre charges. 

Pour gerer les accessoires classiques, une application n'a strictement rien a faire : si 
elle utilise une boucle d'evenements (GelNextEvent ou TaskMaster). la combinaison 
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Pomme*Contr61e-Escape sera intercepts par ces fonctions, et la main sera donnee a 
leur menu. En effet, GttNext Event appelle une fonction du Desk Manager, 
System Even I. qui sert en quelque sorte de filtre aux evfinements : si le Desk Manager 
veut trailer le nouvel ev£nement, il I'intercepte et 1'application ne le recevra pas, 
Entre autres choses, SystemEvent intercepte la combinaison Contr6le-Pomme- 
Escape. Cette fonction ne doit pas etre appelle explicitement par 1'application. 

• Les nouveaux aecessoires de bureau fonctionnent a la maniere du Macintosh : 
concurremment avec 1'application qui les invoque, dans 1'environnement desktop 
(fenetres, menus deroulants, contrdles) et evenements. Un accessoire a la main des 
que la fenetre qui le represente est au premier plan, certains aecessoires peuvent avoir 
une action periodique (telle I'horloge) qui ne necessitent pas 1'intervention de 
I'ulilisateur. La liste des nouveaux aecessoires de bureau est toujours presente dans le 
menu * . Comme pour les aecessoires classiques, elle se compose automatiquement (i 
condition que 1'application ait appele la procedure FixAppkMtnu) : tout fichier 
ProDOS de type SB8 present dans un dossier particulier de la disquette systeme sera 
ajoutd k la liste (VsystenVdesk.accs). 

Pour gerer les nouveaux aecessoires de bureau, une application n'a pas beaucoup 
de travail a faire. Si elle utilise TaskMaster (voir le chapitre suivant), elle n'aura qu'a 
initialiser le Desk Manager (avec DeskSlartUp) et placer la liste des aecessoires dans le 
menu* (avec FixAppleMenu). Si elle n'utihse pas TaskMaster, elle deyra en plus 
ouvrir 1'accessoire en response aux sollicitations de 1'utilisateur, appeler a I'interieur de 
la boucle d'evenements la procedure SystemTask pour gerer les aecessoires a action 
piriodique, appeler SystemClick pour repondre a un clic-souris dans une fenetre 
systeme, appeler SystemEdit quand 1'utilisateur ehoisit I'un des articles standard du 
menu Edition (Annuler, Couper, Copier, Coller et Effacer) alors qu'un accessoire est 
actif, et enfin termer ['accessoire du premier plan quand 1'utilisateur ehoisit I'article 
Fermer du menu Fichier (deux routines sont disponibles : CloseNDA et CloseNDAby- 
WinPtr). 

Ce sont ces routines que nous allons d£tailler maintenant. 



Gestion des nouveaux aecessoires de bureau 

• [."initialisation du Desk Manager se fait par la procedure DeskStartUp, qui ne 
reclame aucun argument. Pour fonctionner, le Desk Manager a besoin de beaucoup 
d'autres outils : QuickDraw (tout le monde a besoin de QuickDraw), 1'Event 
Manager (un accessoire rfipond a des evgnements), le Window Manager (un 
accessoire est susceptible d'etre represente' dans une fenfitre), le Control Manager (la 
region contour d'une fenetre contient des eontroles), le Menu Manager (on va 
chercher les aecessoires dans le menu * , certains aecessoires ajoutent des menus 
deroulants aux applications) et evenruellement Line Edit et le Dialog Manager. 
Consulter !e chapitre XII pour une vision d'ensemble de ['initialisation des outils. 

• L' installation des titres d'accessoires dans le menu* se fait par la procedure 
FixAppleMenu. En argument, on passe un entier qui sera t'identifiant du menu dans 
lequel les aecessoires doivent etre places. Les aecessoires seront identifies par les 
nume"ros 1, 2, ... Rappelons que les identifiants d'articles compris entre 1 et 255 sont 
reserves par le systeme. 

Supposons que le dossier special des aecessoires de bureau de la disquette systeme 
contienne 10 fichiers de type $B8 et que l'appel suivant soit passg : 

FlxAppl««fcnu(1); 1 10 aecessoires places dans le menu 1 */ 

Apres cet appel, le menu 1 (il vaut mieux pour l'interface utilisateur que ce soit le 
menu * ) contiendra 10 articles supplementaires (le nom des 10 aecessoires) dont les 
identifiants seront compris entre 1 et 10. 

Kemarque Pour connaltre le nombre d'accessoires installs, on peut appeler la 
fonction GetNumNDAs, sans argument, qui retourne ce nombre dans un entier. 
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• L'utilisateur a deroule le menu * et choisi un accessoire a ouvrir. L'application a 
appele MenuSelect (voir le Menu Manager) et connait l'identifiant de 1'article 
selections (inferieur a 250). Cet identifiant est exaetement 1'argument a donner a la 
fonction OpenNDA pour que le Desk Manager ouvre 1'accessoire choisi. La fonction 
retoume dans un entier un numero de reference pour cet accessoire, qui permettra de 
le termer apres utilisation. 

• Supposons que notre accessoire de bureau ouvert est une horloge, precise a la 
seconde pres. II serait desolant que, sous pretexte que la fenetre qui la contient n'est 
pas active, elle cesse de tourner, surtout si elle est visible ! La procedure SystemTask. 
sans argument, permet a chaque accessoire ouvert d'executer la t^che periodique pour 
laquelle il a ete programme, quand elle existe et si e'est le moment d'agir. Cette notion 
de periodicity est incluse dans la definition de 1'accessoire. Elle est variable avec 
1'accessoire : la meme horloge qui n'afficherait que les minutes aurait une frequence 
d'appel 60 fois moins importante. Le Desk Manager garde trace de la periodicite de 
chaque accessoire, et leur donnera la main au travers de SystemTask uniquement si le 
moment est venu d'executer Taction periodique. 

Remarque Imaginons un accessoire de bureau qui affiche en permanence l'etat de 
la memoire (nombre d'octets disponibles pour allouer le plus grand bloc possible, par 
exemple), L'action de cet accessoire est periodique, puisqu'il doit sans cesse scruter la 
memoire vive, mais il n'y a aucune raison que la periode soit fixe. Dans ce cas, le Desk 
Manager offre la notion de « aussi souvent que possible » en guise de periodicite : 
SystemTask donnera systems tiquement la main a un tel accessoire. 

• Un accessoire n'a pas forcement une action periodique. Le plus souvent, il n'en a 
pas, mais attend plutot une intervention de l'utilisateur dans la fenetre qu'il gere, 
Apres un die souris, des que la fonction FindWindow du Window Manager retoume 
un nombre negatif, la procedure SystemClick doit etre appelee. Elle admet trois 
arguments : un pointeur sur 1'evenement que l'application est en train de traiter, le 
pointeur sur la fenetre designee par FindWindow et le code retoume par cette 
fonction. C'est alors SystemClick qui prend en charge le traitement complet de 
1'evenement, l'application n'a rien de special a faire. 

TaskRec tache; f Iev6nement en cours de traitement */ 

Pointer wind; f la fenetre dans laquelle l'utilisateur a clique */ 

int code : /* coda retoume par FindWindow */ 

r on est en train de traiter un nouvel evenement 7 
case MousaDown : ? c'est un die souris 1 

code - FindWindow(4wind. tache .where) ; T si le code retourn© est negatif. . . "I 

if (code<0) SystemClick(& tache. wind, code); r . ..on est dans une fenetre systeme! */ 

else 

F sinon on precede comme d'habitude / 

break; 

Notons que l'application n'a rien a faire si l'utilisateur choisit un article dans un 
menu deroulant qui est gere par un accessoire de bureau : c'est le Menu Manager qui 
se chargera de transmettre ['information au Desk Manager pour sa prise en compte 
par 1'accessoire. 

De meme, l'application n'a pas a se preoccuper des eve"nements de type clavier 
pour un accessoire : si la fenetre de premier plan est une fenetre systeme, ces 
evenements sont intercepted par la fonction SystemEvent et passes directement a 
1'accessoire qui les gerera comme bon lui semble. Malheureusement, meme les 
equivalents-clavier sont passes au Desk Manager... qui n 'execute pas pour autant la 
commande dans un menu gere par l'application ! 

• Une fenetre d'accessoire de bureau est au premier plan et l'utilisateur a choisi 
1'un des articles standard du menu Edition. L'application doit faire savoir a 
1'accessoire quelle action il doit entreprendre, et utilise pour cela la fonction 
SystemEdit. Celle-ci commence par verifier la nature de la fenetre situee au premier 
plan, et retoume TRUE s'il s'agit d'une fenetre systeme (elle accepte de prendre en 
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compte la commande) ou FALSE si la fen£tre appartient a 1' application (elle refuse la 
commande, c'est a 1'application de la gfirer). L'argument passe k System Kdit est l'une 
des valeurs pr^definies suivantes : 



idefine Undo 


1 


#define Cut 


2 


#define Copy 


3 


#dsfine Paste 


4 


#define Clear 


5 



Les r^ponses de 1'application aux choix du menu Edition auront done 1'aspect 
suivant : 

case Annuler: 

if (!Sy*temEdit( Undo)) 

T 1'application prend la commande en charge V 
break: 

case Couper: 

if (!SystemE«»It( Cut)) 

f 1'application prend la commande en charge */ 
break; 

case Copier: 

if ( ISystemEditf Copy)) 

T I 'application prend la commande en charge */ 
break: 

case Collar : 

if (JSystemEdltfRsste)) 

T 1'application prend la commande en charge 7 
break; 

case Efface r: 

if {'SystemEdit{Cfear)) 

T I application prend la commande en charge V 
break; 

• Pour fermer I'accessoire de bureau, 1'utilisateur a deux possibility ; cliquer dans 
la case de fermeture de sa fenetre (si elle existe) ou choisir 1'article Fermer dans le 
menu Fichier. Dans le premier cas, SystemClick se charge de la fermeture. Dans le 
second cas, 1'application a deux possibility. Ou bien elle appelle la procedure 
CloseNDA, mais pour cela elle doit connaitre le numero de reference de I'accessoire a 
fermer (celui qu'a retourne OpenNDA) et le passer en argument ; ou bien elle 
recupere un poirtteur sur la fenetre de I'accessoire grace a la fonction FrontWindow du 
Window Manager et appelle la procedure CloseNDA by WinPtr avec ce pointeur en 
argument. 

Pointer port; 

port - FrontWlrxk>w( ); r pointeur sur la fenetre a fermer V 
it (GetWKInd(porr) < 0) 

OoseNDAbyWlnPtr(port); r la fenetre appartient a un accessoire 7 

else CloaeWlndow[port) ; r la fenetre appartient a I'applicatfon 7 

Remarque Le fait d'appeler CloseWindow pour fermer un accessoire de bureau 
provoque bien la fermeture de la fenetre de cet accessoire, mais pas la fermeture de 
I'accessoire lui-meme ! II est toujours ouvert, occupe de la m£moire mais devient 
inaccessible. On veillera done a employer CloseNDAbyWinPtr et non CloseWindow 
quand la fenetre a fermer est une fenfitre systeme. 
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En cas de necessity (besoin d'espaee memoire par exemple), une application peut 
fermer d'un coup tous les accessories ouverts, grace a la procedure CloseAHNDAs, qui 
ne reclame aucun argument. 



SCRAP MANAGER 



Principes generaux 

Le Scrap Manager est 1'outil qui permet le copier-coller entre deux applications, 
entre une application et un accessoire de bureau, entre deux documents d'une meme 
application, ou encore entre deux parties du meme document. Du point de vue de 
l'utilisateur, les donn6es transitent par un fichier dit presse-papiers (Clipboard en 
anglais), Quand il copie de ('information, il la copie vers le presse-papiers. Quand il 
coupe de 1'information, il la transfere vers le presse-papierrs en faisant place nette 
derriere lui. Quand il colle de rinformation, il va la chercher dans le presse-papiers et 
en fait une copie dans son document, le presse-papiers n'etant pas affecte. Le presse- 
papiers n'est pas un meuble a tiroirs : des que l'utilisateur met quelque chose dedans, 
il perd ce qui s'y trouvait precedent me nt. 

C6t£ application, la vision est plutot differertte : le presse-papiers n'est pas 
forcement un fichier, mais plutot un bloc de donnges en me' moire, repere par un 
handle. Si ['information est unique, elle peut tout de meme 6tre m€morisee sous 
plusieurs aspects. 

Considerons un traitement de texte : il manipule du texte, dans lequel les 
caracteres sont tous affectes d'un style, d'une taille, voire d'une couleur, et peuvent 
appartenir a des polices differ rentes. Ce texte est editable, dans le sens oil on peut venir 
lui inserer des caracteres, lui en retirer, etc. Enfin, on peut faire du copier-coller sur 
des portions de texte. 

Comment l'application doit-elle memoriser cette portion de texte, sachant qu'une 
fois dans le presse-papiers, cette information peut repartir soil vers le m§me document 
ou un autre document du meme traitement de texte, soil vers un 6diteur de texte qui 
ne reconnatt pas les formats propres a cette application, soil vers une application 
graphique qui ne connait que la couleur des pixels. 

Pour ses documents propies, le traitement de texte doit memoriser ses donn£es 
dans leur format, arm de ne perd re aucune information durant le transfer!. Mais pour 
les documents manipules par d'autres applications, qui n'ont aucune raison de 
connaitre ce format, il faut £galement les memoriser d'une maniere qui soit 
universale, dans des formats (on dit des types) qui sont census etre connus de tout le 
monde. Le Scrap Manager permet de faire figurer dans le presse-papiers une m£me 
information sous plusieurs formats differents : a ['application qui recoit le contenu du 
presse-papiers de choisir le format qui lui convient le mieux, et d'ignorer le coller si 
aucun ne lui convient. 

Deux types sont universeis sur Apple IIGS (comme sur Macintosh), le type texte et 
le type picture. Les donnees de type texte ne conttennent rien d'autre que les codes 
ASCII des caractere composant le texte (elles sont done compatibles entre les deux 
machines, sans restriction). Les donnees de type picture sont comme leur nom 
I'indique une picture au sens QuickDraw du terme (on pourrait imaginer qu'elles 
soient £galement compatibles entre les deux machines, puisqu'on a affaire a une suite 
destructions interpretables par QuickDraw, mais les problemes de couleurs et de 
resolution graphique rendent 1'exercice beaucoup plus p6rilleux... et moins interes- 
sant). 

II appartient a toute application d£sirant gerer le copier-coller de connaitre 1'un et/ 
ou I'autre de ces types, pour recevoir comme pour transferer. Si notre traitement de 
texte fait les choses correctement, il transferera trois types d'informations dans le 
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presse-papiers : son format propre (qui est son format pr£fer£), le type texte et 1e type 
picture. L'editeur de texte qui recevra cette information choisira le type texte, sachant 
qu'il perd toute notion de presentation du texte, 1'application graphique choisira le 
type picture, sachant qu'elle perd la faculte d'editer les caracteres regus. Par rapport 
au format propre, il y a forcement f>erte d'information. 

Dans 1'autre sens, si notre traitement de texte recoit une information du presse- 
papiers, il va commencer par chercher son type pretere\ S'il le trouve, tant mieux : 
aucune perte d'information ne sera a deplorer, Sinon, il cherchera le type texte et lui 
donnera un format par defaut (police systeme, taiile, style et couleurs standard, 
vraisemblablement). Ce texte sera editable. Sinon, il ira chercher le type picture, et 
inse>era 1'image obtenue (a condition de savoir gerer les images) au milieu de son 
document, sans qu'on puisse faire autre chose sur cette image que la supprimer, 
Sinon, ne trouvant aucun type connu, il ignorera le contenu du presse-papiers. 

Le presse-papiers peut resider en memoire, ou sur disquette. L'application n'a pas 
a se prSoccuper de l'endroit ou il reside, c'est le travail du Scrap Manager de savoir a 
tout moment oil il est, Quand ii est sur disque, c'est reellement un fichier, qui porte le 
nom Clipboard et qui se trouve dans le dossier Systeme. Ouand il est en memoire, il 
s'y trouve sous forme de blocs relogeables : un bloc par type de donnees qui y reside. 

Le presse-papiers est unique pour assurer la communication entre differentes 
applications. II est possible toutefois pour une application de gerer son propre presse- 
papiers prive (Line Edit ne s'en prive d'ailleurs pas, voir le chapitre VIII). Le format 
est libre, puisque seule l'application I'utilisera. Elle pourra par exemple gerer un 
simple pointeur sur un bloc d'informations a copier, dans son format prefere". Ce sera 
a elle de traduire ensuite 1'information contenue dans un presse-papiers prive et de la 
transferer dans le presse-papiers public, pour que d'autres applications ou les 
accessoires de bureau puissent 1'utiliser. 



Routines du Scrap Manager 

• Pour etre utilise, le Scrap Manager doit avoir ete initialise, par la procedure 
ScrapStartUp, sans argument. 

• Deux procedures sans argument permettent le transfert du presse-papiers entre le 
disque et la memoire : LoadScrap et UnloadScrap. LoadScrap charge le presse- 
papiers en memoire. Si aucun fichier Clipboard n'est trouve sur disque (soit qu'il 
n'existe pas, soit qu'il n'est pas dans le bon dossier), aucune erreur n'est rapportee : le 
presse-papiers est considere vide, tout simplement. Si le presse-papiers reside dej& en 
memoire, il ne se passe rien. UnloadScrap copie le presse-papiers sur disque, et libere 
la place qu'il occupait en memoire. Si le presse-papiers se trouve deja sur disque, il ne 
se passe rien. 

Notons que ces deux procedures peuvent gdnercr des erreurs ProDOS ou Memory 
Manager (un disque protege en ecriture, une memoire saturee, etc.), dont l'applica- 
tion doit tenir compte. Cependant, l'application n'appellera vraisemblablement pas 
ces procedures directement. Toute action sur le presse-papiers s'effectuant en 
memoire vive, le presse-papiers sera automatiquement charge des qu'on 1'invoquera. 
Une application pourra toutefois le transferer sur disque, si elle a besoin de memoire 
pour fonctionner (mais alors il risque de devenir inaccessible). 

Une fonction, GetScrapState, sans argument, retournera TRUE si le presse- 
papiers reside en memoire, et FALSE s'il est cense se trouver sur disque (cense 
seulement, parce que I'utilisateur peut 1'avoir detruit). 

Une fonction, GetScrapPath, sans argument, retourne un pointeur sur le 
pathname, chemin d'acces ProDOS, utilise pour le fichier Clipboard sur disque. Une 
procedure, SetScrapPath, fixe un nouveau chemin d'acces (le pointeur sur cette chaine 
de caracteres est passe en argument). Ces routines n'ont a priori aucune raison d'etre 
uti Usees. 
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• Pour effacer le contenu du presse-papiers public, on appelle la procedure 
ZeroScrap, sans argument. Si le presse-papiers reside sur disque, il est charge en 
memoire et vide. Cette procedure change Le compteur gere par le Scrap Manager (voir 
plus loin). 

• Pour ecrire quelque chose dans le presse-papiers public, on appelk la procedure 
PutScrap. Trois arguments : la longueur en octets de ['information a ecrire (entier 
long), le type de l'information (entier sur 16 bits) et un pointeur sur I' information. 
Pour mettre quelque chose dans le presse-papiers, on pourra proceder ainsi : s'allouer 
un bloc fixe en memoire, Ecrire a cette adresse rinformation dans un format correct, et 
appeler PutScrap en lui precisant 1'adresse des donnees, le nombre d'octets qu'elles 
contiennent et le format dans lequel elles sont ecrites. PutScrap fera une copie de ces 
donnees dans le presse-papiers en les ajoutant a celles du meme type qui pouvaient 
deja s'y trouver. L'operation se passe en memoire : si le presse-papiers se trouve sur 
disque, la procedure appelle elle-meme LoadScrap. Pour placer dans le presse-papiers 
plusieurs versions de la meme information, on appellera plusieurs fois PutScrap. Le 
type texte porte le code 0, le type picture le code 1 : interdiction formelle d'utiliser ces 
types pour d'autres conventions de format ! 

long taille, tailleO, tatllel ; 
Pointer ptr, ptrO, ptrl : 

/' I'utilisateur vient de passer la commands Copier */ 
ZeroScrap( ); t on vide le presse-papiers */ 

r calcul de la taille des donnees, determination de (eur adresse 7 
PutSerap{taille, 1543, ptr); I* 1543 est le type choisi par I'application pour son formal */ 

T conversion des donnees an format texts, a une adresse specifies */ 
PutSersp(tailleO, 0. ptrO); f est le format texte 7 

f conversion des donnees au formal picture, a une adresse specifiee 7 
PutScrap(taille1 , 1 , ptrl ); t 1 est le format picture 7 

f* le presse-papiers contient maintenant una information sous trois formats differents 7 

Note La procedure LEToScrap copie le contenu du presse-papiers prive de Line 
Edit dans le presse-papiers public, apres l'avoir vide. Seul !e type texte est alors 
disponible. 

• Pour lire quelque chose dans le presse-papiers public, on utilise la procedure 
GetScrap. Deux arguments : un handle precisant la destination des donnees, et le type 
des donnees recherche, Le handle doit avoir ete alloue par I'application {il peut Stre 
vide). GetScrap chargera le presse-papiers en memoire, si neeessaire, et copiera le 
contenu du presse-papiers correspondant au type dfesigne dans le bloc design^ par le 
handle, ajustant sa taille comme neeessaire. Si la taille du bloc apres I'appel est zero- 
long, e'est que le type n'a pas ete trouve, soit parce qu'il n'existait pas, soit parce que 
le presse-papiers etait vide. L'application pourra eventue Dement demander la lecture 
d'un nouveau type. 

Avant de lire un type, il sera toutefois plus astucieux d'appeler la fonction 
GetScrapSize, qui retournera dans un entier long la taille des donnees correspondant 
au type passe en argument, zero-long signifiant que le type en question n'est pas 
disponible. 



T I'utilisateur vient de passer la commando Coller V 

hdl - NewHandle(0L, myld, 0, OL): /* allocation dun bloc vide */ 

if (GetScrap SI ze(1 543) != OL) f recherche du type propre a I'application 7 

{ 

GetScrapfhdl. 1 543); Til y en a: on les lit. . . 7 

/* . , .et on les traite */ 

} 
else if (GetScrap Siie(O) I- OL) /* recherche du type texte */ 

{ 

GetScra p(hdl , 0) ; /* i I y e n a : on le s li t . . . 7 
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/* ...©ton les traits */ 

} 
r le presse- pa piers raste intact aprfis ces appels # 

Dans l'exemple precedent, notre application ne sait pas gerer le type picture, die 
ne cherche done pas a le lire ! Ce n'est pas incompatible avec le fait qu'elle ecnve le 
type picture dans le presse-papiers, loin de la ! Elle ignorera le Coller si elle ne trouve 
pas de donnees a son gout. 

Note La procedure LEFromScrap vient chercher les donnees de type texte du 
presse-papiers public et les copie dans le presse-papiers prive de Line Edit. Cette 
operation est limitee a 256 caracteres. 

• Supposons qu'une application gere le copier-coller, et ait inclus dans son menu 
Edition la commande Afficher le presse-papiers. Elle gere done une fenetre qui 
affiche en permanence son contenu, quand elle est ouverte. L'application a done 
besoin de savoir a chaque instant si ce contenu a change, pour pouvoir remettre a jour 
ce qu'affiche la fenetre. La fonction GetScrapCount, sans argument, le permet. Elle 
retourne la valeur d'un compteur (entier sur 16 bits) qui change a chaque fois que la 
procedure ZeroScrap est appelee. Puisque I' ecriture d'une information nouvelle dans 
le presse-papiers (information, pas type !) doit etre obligatoirement precedee de 
l'appel a cette procedure, si le compteur a change entre deux appels, c est que le 
contenu du presse-papiers public a egalement change. 

• Le presse-papiers est gere en memoire par le Scrap Manager comme un bloc 
relogeable classique pour chaque type de donnees qu'il contient, repere par un 
handle II peut etre interessant d'aller lire ou Scrire directement dans ces blocs, plutot 
que de passer par les procedures GetScrap et PutScrap, quand 1'espace memoire est 
limite puisque ces procedures font une copie de Pinformation. La fonction GetScra- 
pHandle retourne le handle sur le bloc de donnees dont le type est passe en argument. 



STANDARD FILE 

L'acces a la disquette dans une application Apple IIGS se fait toujours par 
1' intermediate de dialogues banalises, qu'il s'agisse d'ouvrir un document (lecture 
d'un fichier) ou de 1'enregistrer (ecriture d'un fichier). Ces fenetres de dialogue sont 
gerees par l'outil Standard File Operations, qui met 4 routines a notre disposition : 
deux pour le choix du fichier en lecture, deux pour le choix en ecriture. 

Initialisation 

L'outil sera initialise grace a la procedure SFStartUp, qui reclame deux argu- 
ments : l'identifiant de ['application (tel que retourne par le Memory Manager) et 
1'adresse de la page zero dont l'outil se servira de maniere interne. Consulter le 
chapitre XII pour une vision d'ensemble de ['initialisation des outils. 

Choix du fichier a lire 

Deux procedures sont a notre disposition pour presenter le dialogue qui permettra 
a I'utilisateur de choisir le fichier (application ou document) qu'il desire ouvrir. La 
fenetre standard presente quatre boutons, permettant de changer de lecteur (equiva- 
lent-clavier la touche de tabulation), d'ouvrir un fichier ou un dossier (equivalent- 
clavier la touche Retour ou Entree), de fermer un dossier (equivalent-clavier la touche 
Escape), d'annuler Taction d'ouvrir. La liste qui defile contient le nom de toutou 
partie des fichiers presents sur la disquette, certains pouvant eventuellement etre 
estompes, ainsi que les noms des dossiers (qu'on peut ouvrir par double-clic). En haul 
apparait une indication controlee par l'application, ainsi que le nom du repertoire 
actif. Quand on tape un caractere au clavier, la barre de selection se deplace sur le 
premier nom de fichier non estompe qui commence par ce caractere. 
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• SFGetFile est l'appel standard. Cette procedure affiche le dialogue standard et 
permet a l'application de determiner quel fichier I'utllisateur a choisi, Elle reclame six 
arguments : 

- les deux premiers sont 1'abscisse et l'ordonnee en coordonnees globales du coin 
superieur gauche de la fenetre de dialogue, permettant ainsi a l'application de la 
positionner comme bon lui semble ; 

- le troisieme argument est un pointeur sur une chaine de caracteres type Pascal 
qui apparaitra en haul de la fenetre de dialogue. On veillera a ce qu'elle ne soit pas 
trop longue etant donne la largeur de la fenetre et le mode de resolution utilise. Cette 
chaine peut etre vide ; 

- le quatrieme argument donne 1'adresse d'une fonction filtre, qui va permettre de 
choisir si tel ou tel fichier doit ou non etre affiche comme element de choix. Passer 
zero-long pour empecher SFGetFUe d'appeler une fonction filtre. 

La fonction fdtre est une fonction de type Pascal, qui admet un seul argument, 
1'adresse d'une entree dans le directory sur lequel se trouve l'utilisateur (c'est 
SFGetFile qui la passe). En fonction de ce renseignement, la fonction filtre doit dire ce 
qu'elle fait de ce fichier : pour ne pas Tafficher, 1 pour Pafficher estompe (de telle 
sorte qu'il sera visible mais non selectionnable), 2 pour permettre a l'utilisateur de le 
choisir. C'est grace a une fonction filtre qu'un compilateur C, par exemple, pourra ne 
retenir que les noms de fichiers qui possedent le suffixe .c. D'autres applications 
pourront se limiter a des fichiers possedant certaines caracteristiques, combinaisons de 
type et de type auxiliaire, par exemple. 

Comme nous n'avons pas rintention d'entrer dans les details de ProDOS, nous ne 
parlerons pas davantage de la fonction filtre, et nous nous contenterons de 1'argument 
suivant pour limiter les selections. 

- le cinquieme argument est un pointeur sur une liste de types (le type du fichier au 
sens ProDOS du terme). Seuls les Fichiers correspondant aux types presents dans cette 
liste seront affichis. Mettre zero-long pour utiliser la liste par defaut, qui affiche tout 
ce que contient la disquette. Une autre maniere d'afficher tous les fichiers, quel que 
soit leur type, est de pointer sur une liste nulle. 

Une liste de types aura la forme suivante : le premier octet donne le nombre 
d'entrees dans la liste, les octets suivants correspondent chacun a un type. C'est 
parfaitement similaire a la facon dont est definie une chaine de caracteres style Pascal, 



char lisWnulle[ ] = {0}; 
char listeapplf ] - {1 , 0xB3}; 
char listeda[ ] ={2, 0xB8, 0xB9}: 



r la liste nulle: tous les fichiers seront affiches */ 

r fichiers de type $B3: applications sous ProDOS 16 */ 

P accessoires de bureau: 

nouueaux ($B8) et classiques ($B9) */ 



- le sixieme argument est un pointeur sur une structure particuliere, le Reply 
record, que nous pouvons definir de la maniere suivante : 
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struct _SFReply { 

int good ; /* valaur booleenne, FALSE s'il n*y a rien a (aire */ 

int type ; r* type ProDOS du fichier 7 

int auxtype ; /* type auxiliaire pour Is fichior ProDOS 7 

char filename^ S]: /* nom du fichier dans le prefixe (chains type Pascal) 7 

char Mna(7»[128]; T chemin d'acces complet au fichier s4leetk>nne 7 

}: 
#dafine SFReply struct _SFReply 

Note Dans sa version 1.0, il semble que 1'outil Standard File Operations n'alimente 
pas le champ fullnome, Comme nous le verrons plus loin, il est de toute facon d'une 
inutility flagrante, 

C'est au travers de cet argument que nous aliens recevoir le choix de 1'utilisateur. 
Si celui-ci a clique dans k bouton Annuler, le champ good contient la valeur FALSE 
(zero). II n'y a done rien de plus a faire, aucun fichier a lire sur la disquette. Si par 
contre 1'utilisateur est sorti en cliquant dans le bouton Ouvrir, c'est qu'un fichier est 
selection^. Le champ good contient une valeur non nulle (TRUE) et les autres 
champs donnent quelques caracteristiques du fichier selections, dont son nom 
complet, pour en permettre 1'ouverture. A 1'application de determiner si ce fichier lui 
appartient ou pas, si possible sans provoquer de plantage ! 

Quand la fenetre apparait, elle contient les fichiers affichables du prefixe 0, e'est-a- 
dire du repertoire par defaut. Quand 1'utilisateur a choisi un fichier, le repertoire par 
deiaut devient celui auquel appartient le fichier. Pour faire reference au fichier 
selectionne, il suffira done d'utiliser la chalne de caracteres « 0/nomlich », ou nomfick 
est le nom retourne dans le champ filename de la structure SFReply. Voici une facon 
parmi tant d' autres d'obtenir cette chaine en C {une nouvelle fois, on utilise la 
fonction sprintf de la bibliotheque C, on aurait pu utiliser concat) : 

SFReply reply; /* uiw structure SFReply 7 

char flchsel[20]; f 20 caracteres reserves en memoir e 7 

SFGetFII»(30, 45, -\17Votre choix SVP", 0L. 0L, Areply): f dialogue standard 7 

if (reply, goo d) 

I f 1'utilisateur a-t-il clique dare Ouvrir? 7 

ptoc str( re ply. /J/ename); r conversion type chalne Pascal -> C 7 

sprintf(fichsel, "0/%s", reply. filename); f fichsel pointe sur le nom du fichier complet 7 
open(fichsel, 0); /* ouverture du fichier 7 

'}" 

Le bouton Lecteur est gere par SFGetFU*. Quand 1'utilisateur clique dedans, le 
systeme commence par regarder dans le lecteur sur lequel il 6tait positionne, et c'est 
seulement s'il constate que la disquette n'a pas change qu'il va examiner la disquette 
du lecteur suivant, ceci parce que 1* Apple IIGS, contrairement au Macintosh, ne sail 
pas gerer les evenements de type disque et que 1'utilisateur peut changer a son insu 
une disquette dans un lecteur. 

• SFPGttFUe permet de gerer un dialogue semblable au precedent et de recupe^er 
les mimes informations, mais 1'aspect de la fenetre est defini par 1'application. Nous 
n'entrerons pas dans les details de cette procedure. 



Choix du fichier a ecrire 

Deux procedures sont a notre disposition pour presenter le dialogue qui permettra 
a 1'utilisateur de choisir le nom du document (et le repertoire) dans lequel il desire 
enregistrer son travail. La fenetre standard presente six boutons, permettant de 
changer de lecteur (equivalent louche Tabulation), de creer un nouveau repertoire 
(dossier), d'ouvrir ou de fermer un dossier (equivalent louche Escape pour fermer), 
de confirmer ou d'annuler Paction d'enregjstrer (equivalent touche Retour ou Entree 
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pour eonfirmer). La liste qui defile contient le nom de tous les fichiers presents sur la 
disquette, estompe's, ainsi que les noms des dossiers non estompes (on peut les ouvrir 
par double-die). Une ligne Editable apparait en dessous, avec un titre (optionnel) par 
defaut. Entre les deux, une phrase que controle 1'application. En haut, on voit en clair 
le nom du repertoire actif, ainsi que la place disponible sur la disquette. 
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Figure X.3, Dialogue standard S (Tut Kile. 

• SFPutFile est 1'appel standard. Cette procedure affiche le dialogue standard et 
permet a 1'application de determiner dans quel fichier 1'utilisateur veut ecrire ses 
donnees. La encore, six arguments sont necessaires : 

- les deux premiers sont l'abscisse et l'ordonnee en coordonnles globales du coin 
sup£rieur gauche de la fenetre de dialogue, permettant ainsi a 1'application de la 
positionner comme bon lui semble ; 

- le troisieme argument est un pointeur sur une chaine de caracteres type Pascal 
qui apparaitra juste au-dessus du rectangle dans lequel 1'utilisateur doit entrer le nom 
du fichier. Meme remarque que plus haut, I'espace etant encore plus restreint ; 

- le quatrieme argument est un pointeur sur une chaine de caracteres type Pascal 
qui contiendra le nom par defaut que propose 1'application pour le document (la 
chaine peut etre vide). On veillera a donner un nom conforme a la syntaxe ProDOS ; 

- le cinquieme argument est un entier contenant le nombre maximal de caracteres 
pouvant etre tapes par 1'utilisateur, Rappelons que ProDOS tolere 15 caracteres au 
plus, ce nombre ne devra done pas exceder cette valeur, et il sera necessairement plus 
petit si 1'application ajoute automatiquement un suffixe au nom de fichier ; 

- le sixieme argument est un pointeur sur une structure SFReply. Comme vu plus 
haut, le champ good permettra de savoir si 1'utilisateur a cliqu£ dans le bouton 
Enregistrer ou dans le bouton Annuler. Dans le premier cas, le nom complet sera 
disponible pour assurer I'ecriture sur disquette. 

Ici, pas de fonction filtre : tous les noms de fichiers sont affiches, ce qui permet a 
1'utilisateur de ne pas choisir un nom qui existe deja. La procedure SFPutFile agit 
comme SFGetFile en ce qui concerns le repertoire par defaut et la prise en compte du 
bouton Lecteur, 



Remarque La procedure verifie le nom de fichier saisi par 1'utilisateur, et affiche 
une alerte si 1'un des caracteres n'est pas accepte par ProDOS. Dans I'illustration, le 
caractere « e » donne dans le nom par defaut « Defaut » provoquera une telle alerte. 
La procedure filtrant les caracteres au fur et a mesure de leur frappe par 1'utilisateur, 
un mauvais caractere ne peut provenir que d'un mauvais nom par defaut, voire d'un 
copier-coller. 

Si le nom saisi correspond a un fichier qui existe ddja dans le repertoire en cours, 
une alerte est affichee, demandant confirmation de la destruction du fichier existant et 
son remplacement par le nouveau fichier k enregistrer. 
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• SFPutFile permet de gerer un dialogue semblable aii precedent et de recuperer 
les memes informations, mais 1'aspect de la fenetre est d£fini par 1'application, La 
encore, nous n'entrerons pas dans les details de cette procedure. 



Routine de plus 

La presentation des noms de fichiers dans les fenetres de dialogue precedemrnent 
decrites se fait par defaut en lettre minuscules, sauf la premiere et celles qui suivent un 
point, qui sont en majuscule. Pour changer cette presentation et afficher toutes les 
lettres en majuscule, on peut utiliser la procedure SFANCaps, en donnant en argument 
la valeur $8000. Pour retablir 1'option par defaut, on donnera en argument. 



Exemple complet 

L'exemple suivant montre le fonctionnement de SFGetFile et SFPutFUe. Trois 
boucles : les deux premieres sur SFGelFUe, l'une sans liste de types, ["autre avec ; la 
troisieme sur SFPutFUe. Quand un fichier est selectionne, la fenetre de dialogue 
disparatt et le contenu de la structure SFReply est affiche en clair, jusqu'au prochain 
clic. Pour sortir de chaque boucle, choisir Annuler dans le dialogue. 

Remarque En aucun cas cet exemple n'essaie de lire ou d'€crire un fichier. Les 
manipulations n'auront done aucun effet destructeur sur les disquettes. 

^include <tcols.h> I" definition des termes en gras 7 

Mnckufe <erttete.h> I" definition des termes en itatique 7 

SFRepty reponse; f oe que maniputent les 2 procedures Studiees 7 

char liste[ ] - (1 , 0xB3}: T liste da types ProDOS 7 

Pointer wirxJPort: f grafport ou dassine le Window Manager V 



/•**" PROGRAMME PRINCIPAL / 

main() 

mylD; /* identifiant de I'applicabon 7 

my I D - debul_appl(1 ) ; f initialisations en mode 640 7 

Deaktop(S ,0x400000 FF): f le fond d'ecran est blanc */ 

windPort - GetWMgrPonX ); F on recup^re ia Window Manager port' I 

do{ 

FlushEvents(£ veryEvent, 0); /* plus d'evenemenl en attente */ 

SFGetFlle(30, 45, "\1 7Votre choix SVP", OL, OL, &reponse): 

Resultat( ); r on va ecrire ce qu'on a recupere 7 

} 

while (reponse.good); f* on boucle tant que Annuler nest pas choisi 7 

do{ 

F I uahEven ts( Every Event. 0); r plus d'evenement en a Rente 7 

SFAIICeps(0x8QOO); f que des tetties majuscules 7 

SFGelFile(30,4S,"\17Votre choix SVP-.CLJste.Areponse); 
Resultat( ); f en va Scrire ce qu'on a recupere */ 

} 
while (reponse. good); f on boucle tant que Annuler n'est pas choisi 7 

do( 

F I uahEven lB(EveryEvent, 0): I* plus d'evenement en attente V 

SFAIICsps(O); I* seules les initiates sont en majuscule */ 

SFPutFlle(30.25,"\21 Entrez un nom SVP", "BDEFAUT',1 5, S reponse); 
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Resullat( ); T on va ecrire ce qu'on a r£cuper6 7 

) 

while (reponse.goDc^; t on boucle tant que Annular n'est pas choisi 7 

quitter(mylD); f au revoir! 7 
} 

/*"" FONCTION RESULT AT: ecril le contervu de Is structure SFRepiy / 



Results t{ ) 

{ 

char msg[20]; 

if(reponse.g>DO(^ f un fichier sfitectionne'? 7 

{ 

SetPort(windPort) ; I* on ecrtt direcle merit sur le bureau, 

MoveTo(10,25); DrawCString( "Renter selecfonnS"): 

sprintf(msg,"type: "Jtx'.reponse./ype); /*... le type du fichier... */ 

M0V«To(10,45); DrawCStrfng(msg); 

sprintf(msg,*aux: %x",reponse,aujrtype); /* ...son type auxiliaire... */ 

MoveTof 10,60); DrawCStrtngfmsg): 

MoveTo(1Q,75); DrawStrlng(reponse.fftenams): r ...le nom du fichier... */ 

MoveTo( 10,90); DrawStrlng(reponse.Mname); f ... et rien du tout! */ 

while(!Button(0)) ; Ton attend un die souris. . . 7 

Refresh(OL); /* . . .et on efface I'ecran */ 

} 



FONT MANAGER 



Le Font Manager s'occupe de toute la gestion des polices de caracteres, et 
notamment de la recherche sur disque de la meilleure police a utiliser quand une 
demande est faite, precisant une famille de polices, une taille et un style, QuickDraw 
se eontente de dessiner des caracteres a 1'ecran, grace aux informations passees par le 
Font Manager. 

Pour que le Font Manager puisse retrouver les fichiers definissant les polices de 
caracteres, ceux-ci doivent se trouver dans un dossier special de la disquette systeme 
(*/system/fonts) et posseder le type ProDOS IC8. 

Nous n'entrerons pas dans les details du Font Manager, le but de ce paragraphe 
etant simplement de donner une facon d'6crire autrement qu'avec le jeu de caracteres 
systeme, dans une autre taille et un autre style que la taille et le style par detaut. 

Nous nous contenterons de dire, e'est que les polices de caracteres se rangent dans 
des grandes categories : les families. Quand un developpeur cree une police de 
caracteres, il declare quelque part dans sa definition un identifiant (le numero de la 
famille), la taille et le style dans lequel la police est creee. 

Quand une application veut utiliser une police, avec une taille et un style, de deux 
choses 1'une : soit la police existe, avec la taille et le style precises, et tout est parfait, 
soit elle n'existe pas, et il faut alors se debrouiller autrement. C'est le Font Manager 
qui se debrouille, en cherchant la police la plus proche correspondant aux caracteristi- 
ques specifiers, essayant de creer des effets de style artificiels a partir du style normal 
quand le style n'existe pas, essayant de faire des mises a I'^chelle a partir de tailles 
connues quand la taille n'existe pas, et en d£sespoir de cause prenant la police systeme 
si la famille de la police choisie n'existe pas. 
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Au moment oil nous ecrivons, le Font Manager n'est pas completement realise. 
Une routine permettra ['installation automatique des noms de families de caracteres 
dans un menu deroulant, une autre permettra I'affichage automatique d'une fengtre 
de dialogue permettant a 1'utilisateur de choisir une famille, une taille et un style, ces 
caracteristiques etant immediatement repercut^es dans les champs ad Squats du 
grafport courant. 

Pour 1'heure, contentons-nous de deux routines, 

• L'initialisation du Font Manager est rSalisee par la procedure FMStartUp, qui 
reclame trois arguments : 

- un pointeur sur une chaine de caracteres Pascal qui predsera le nom de la 
police syst&me (on passera zero-long pour accepter le nom par defaut) ; 

- I'identifiant de l'application ; 

- 1'adresse d'une page zero, necessatre au Font Manager pour son fonctionne- 
ment interne. 

• Pour fixer dans le grafport une nouvelle police de caracteres et 1'utiliser avec les 
procedures DrawChar, Draw String. DrawCString et DrawText, on utilisera la 
procedure InstallFont, qui rend caducs les appels a SetFont, SetTextFace et SetText- 
Size. 

Install Kant reclame trois arguments : 

- un entier precisant la taille et style choisis, taille dans 1'octet haul et le style dans 
I'octet bas. La taille est un nombre compris entre I et 255, et joue sur la hauteur du 
caractere. Le style est defini par la valeur des bits qui le composent, definition que 
nous avons deja vue dans QuickDraw : 

bit : gras 

bit I : italique 

bit 2 : souliqne 

bit 3 : relief 

bit 4 : ombri 

Notons que dans la version actuelle de QuickDraw (1.02), seuls le gras et le 
souligne sont g£r£s. 

- un entier precisant la famille de caracteres desirfe (zero signifie la police 
systeme). Logiquement, les memes caracteres que sur le Macintosh existent, done le 
num£ro de famille devrait etre identique. En voiei une liste partielle (les trois 
dernieres families sont connues de l'imprimante LaserWriter) : 

3 : Geneva 



5 


Venice 


20 


Times 


21 


Helvetica 


22 


Courrier 



- un entier donnant quelques directives a la procedure InstallFont. Pour ('instant, 
seul le bit est defini, et encore ne fonctionne-t-il pas dans la version prototype du 
Font Manager : s'il est a zero, la mise a l'echelle est possible, s'il est a un, la mise a 
l'echelle est impossible. Supposons qu'aucune police correspondant parfaitement aux 
deux premiers arguments ne soit trouvee. Le Font Manager va choisir a la place la 
police qui se rapproche le mieux de la demande (en se conformant a un algorithme 
defini). Si la mise a l'echelle n'est pas permise, il en restera la. Si la mise a l'echelle est 
permise (et possible), il creera de toute piece une nouvelle police de caracteres it la 
bonne taille, par extrapolation de la police choisie. L'esthe"tique du resultat etant 
souvent mediocre et la mise a l'echelle une operation assez lente, on se contentera le 
plus souvent d'interdire cette option, Cependant que les champs correspondants du 
grafport seront correctement mis k jour, meme si I'affichage n'est pas en accord avec 
eux. Rien n'empeche qu'a l'impression, par exemple, I'impritnante LASER connaisse 
une taille et un style qui n'etaient pas presents sur la disquette systeme au moment de 
I'affichage ecran ! 

En resume, on ecrira ceci : 



290 I BOlTE A OUT1LS DE L APPLE IIGS 



char taille, style; I" deux entiers sur 8 bits 7 

int famille; /* un entier sur 16 bits 7 

lnstaJIFont(taille"256+style, famille, 1); r choix d'une taille, dun style etd'une famille V 



Systeme 10: Normal Gras Souligne Gras sou] 
Geneve 10: Normal Gras Souligne Gras souligne 
Geneva 12: Norma) Gras Souli g ne Gras souli g ne 
Venice 14: Normal Bros Souligne Grits soi 



Tim« 10: Norm*! Gras SouUgut Gras somligm* 
Time3 12: Normal Graa Souligne Gras aoTiligne 
Helvetica 10: Normal Gras Souli one Gras souligne 
Helvetica 1 2: Normal Gras Souligne Gras soulig ne 

Courier 10: Hormal 6r*s Souligne Gras sonllcrm? 
Courier 12: Normal Gras Souligne Gras souli 



figure X.4. Quelques csract«res diftemits... 

Pour obtenir l'eeran de la figure X.4, nous avons utilise les instructions suivantes 

ecrit{1 0,0,10, "Systeme 10*); 
ecrit(1 0,3,30, "Geneva 10"): 
ecrit(1 2,3,50, "Geneva 12"); 
ecrit( 14,5,70, "Venice 14*); 
ecritj 10,20,90, Times 10"); 
ecrit(1 2,20,1 10, Times 12"); 
ecrit(1 0,21. 130, "Helvetica 10"); 
ecrit{1 2,21 ,150, "Helvetica 12"); 
ecritj 1 0,22, 170, "Courier 10"); 
ecrit(1 2,22, 190, "Courier 121; 

La fonction ecrit( ) £tant difinie de la maniere suivante : 
ecrit(taille, (amille. ligne, str) 

int taille, famille, ligne; 
Pointer str; 



lnstallFont(taille*2S6+0, famille, 1); 

MovoTo(3, ligne); DrawCStrlng(str); DrawCStrlng(": Normal'); 
lnstallFont(taiBe*256+1 , famille, 1 ); DrawCStrlngj" Gras"); 
lnstallFont(taille*256+4, famille, 1}; DrawCStringf Souligne"); 
lnstsllFont(taille*256+5, famille, 1); DrawCStrlngj" Gras souligne^); 



On remarquera une nouvelle fois que la police systeme est d^finie de telle sorte que 
ses caracteres ne peuvent pas itre souligne^. 



CHAPITRE XI 



TASKMASTER 



GENERALiTES 

Nous avons vu dans les chapitres precedents un certain nombre d'exemples 
articul^s autour de la fonction GetNextEvent, qui renseignait ['application sur 
1'evenement a traiter, et qui laissait 1'application traiter 1'evenement. Sur un 
Macintosh, il n'y a pas d'alternative. Sur ['Apple IIGS, il y en a une : TaskMaster. 

Comme vous avez pu le constater, tous les exemples d' applications tournent autour 
de la meme architecture : on appelle les memes sequences d 'instructions pour tester 
oil s'est produit un evenement de type MouseDown, on fait toujours la meme chose 
quand il s'agit de deplacer une fenetre, de la redimensionner, de la zoomer, de 
l'activer, on gere toujours de la meme maniere les accessories de bureau, etc. De plus, 
l'architecture du Window Manager a 6ti con^ue de telle sorte que tes manipulations 
les plus compliquees, le defilement des fendtres, sont pratiquement impossibles a 
realiser en dehors de TaskMaster {ou alors on programme comme sur Macintosh). 

TaskMaster offre au developpeur d' applications une facility deconcertante de 
programmation. La plupart des ev£nements sont g£res automatiquement par la 
fonction, Seuls ceux qui sont specifiques a 1'application doivent etre traites explicite- 
ment. Grace a TaskMaster, le programmeur se concentre sur son travail, et plus sur 
1'interface utilisateur. II faut tres peu de temps pour obtenir une maquette operation- 
nelle d'un projet ardu. 

De plus, il y a un inuiret evident a utiliser TaskMaster : si des ameliorations 
notables interviennent dans le futur concernant tel ou te! manager, tel ou tel aspect de 
1'interface, il y a gros a parier que les applications £crites a base de TaskMaster en 
b£n£ficieront sans modification, ou avec tres peu de modifications, alors que cedes 
ecrites a base de GetNextEvent n'auront pas cette chance. 

Dans les ameliorations souhaitables, ne serait-il pas formidable de gerer automati- 
quement certains controles, ou bien les menus deroulants en zone d 'informations, ou 
bien le double-clic ? 

Pourquoi avoir fait dix chapitres avant celui-ci, s'il faut absolument utiliser 
TaskMaster, pouvez-vous demander. Parce que si vous voulez comprendre comment 
marche cette fonction, il faut avoir compris les chapitres precedents. Cela £tant, on 
peut toujours utiliser TaskMaster sans comprendre comment elle fonctionne, et £crire 
malgre tout d'excellentes applications ! Dans ce cas, il vaut mieux ne pas s'eloigner 
des sentiers battus... 
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FONCTIONNEMENT 
Structure manipulee 

Puisque nous avons utilise la structure TaskRec tout au long de cet ouvrage, nous 
ne serous pas depayses : c'est cette structure, et uniquement elk. qui est en effet 
utilised par TaskMaster, A la structure d'evenement classique (rencontre^ sur 
Macintosh) contenant le type d'evgnement (what), la donnie additionnelle (message), 
la date relative (when), le lieu (where) et les combinaisons de modification (modifiers) 
viennent s'ajouter deux champs (entiers longs), une autre donnee additionnelle 
(TaskData) et un masque (TaskMask). La structure TaskRec a €t€ definie dans le 
chapitre IV. 

Nous avons d£ja utilise' TaskData dans le Menu Manager. C'est le plus souvent la 
duplication du champ message. Ce champ est la pour laisser intacts les champs remplis 
par Get Next Event. Si TaskMaster doit faire des manipulations sur la donnee 
additionnelle, elle le fera sur TaskData, et non sur message. Par exemple, des que 
TaskMaster appelle Find Window, le pointeur sur fen£tre que cette fonction identifie 
est plac£ dans le champ TaskData. 



Masquer TaskMaster 

Le champ TaskMask est la pour limitcr le champ d'action de TaskMaster. Puisque 
TaskMaster manipule lui-meme un certain nombre d'evfinements, il utilise des 
procedures standard et toutes les options par d£faut que nous avons pu rencontrer. 
Parfois, une application peut vouloir alter au-dela de ces procedures par deTaut pour 
g£rer un cas particulier. Faut-il pour cela se passer de TaskMaster ? Pas du tout : il 
suffit de masquer une partie de son utilisation et ggrer soi-meme cette partie, et laisser 
TaskMaster gerer le reste. 

Au moment oil nous Scrivons ces lignes, 13 des 32 bits du masque sont ddfinis : 

- bit : gestion de MenuKey ; 

gestion des 6v6nements de mise a jour ; 

gestion de FindWindow : 

gestion de MenuSelect : 

gestion de OpenNDA ; 

gestion de SystemCUck ; 

gestion de DrawWindow ; 

gestion de SelectWindow (quand FindWindow retoume wlnContent) ; 

gestion de TrackGoAway ; 

gestion de TrackZoom ; 

gestion de GrowWindow ; 

gestion du defilement ; 

gestion des articles spSciaux des menus, 

Les bits 13 a 31 doivent Stre a z£ro, sinon TaskMaster retournera 1'erreur SE03 
dans .errno. Pour les autres bits, la valeur un signifie que TaskMaster devra ge>er 
Taction precisee, la valeur zero que ['application recevra tous les elements n^cessaires 
a la gestion de cette action, TaskMaster ne faisant que traduire les elements recus de 
GetNextEvent. 

La valeur classique du masque en I'etat actuel des choses sera done $00001 FFF, 
signifiant que 1' application laisse TaskMaster faire le maximum. Si le masque est 6gal a 
z6ro, autant appeler GetNextEvent directement ! 



- bit 


1 


- bit 


2 


- bit 


3 


- bit 


4 


- bit 


5 


- bit 


6 


- bit 


7 


- bit 


8 


- bit 


9 


- bit 10 


- bit 11 


- bit 12 
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Ce que retourne TaskMaster 



TaskMaster s'emploie exactement comme nous avons dit que GetNextEvent 
s'employait dans le chapitre IV. Deux arguments ; un masque d'evenement et un 
pointeur sur une structure TaskRec. A cela rien d'etonnant, puisque 1'une des 
premieres choses que fait TaskMaster est justement d'appeler GetNextEvent, avec ces 
arguments. Ne seront done trails que les evenements passes dans le masque donne en 
premier argument. 

Note On ne confondra pas le masque d'evenement, argument de GetNextEvent, qui 
sert a selectionner dans la file d'evenements ceux qu'on veut traiter, et le masque 
TaskMask, qui sert a masquer certaines des fonctionnalites du TaskMaster, 

TaskMaster est une fonction : elle va retourner un entier, un code que l'application 
doit prendre en compte pour repondre aux evenements qu'elle doit gerer. Si 
TaskMaster retourne la vaieur zero, e'est parfait : soit il n'y avait plus d'evenement a 
traiter, soit e!le I'a completement traite. Dans les deux cas, ['application n'a plus rien a 
faire. 

Les autres valeurs susceptibles d'etre retouniees sont soit des types d'evenements, 
soit un code resultant de FindWindow, soit des codes cre6s de toute piece par 
TaskMaster. 

TaskMaster retourne : 

• Mouse Down si le bit 2 de TaskMaster est a zero. Dans ce cas, 1'application 
appelle elle-meme FindWindow, si necessaire, et TaskMaster est de peu d'utilite ! 

• MouseUp chaque fois que cet evenement intervient, puisqu'elle ne le traite pas. 
L'application peut ou non en tenir compte (par exemple pour gerer les double -dies). 

• KeyDown dans les cas suivants : le bit de TaskMask est a zero, ou bien 
Menu Key a ete appelee mais n'a rencontre aucun equivalent clavier dans la barre de 
menus systeme. A l'application de gerer le caractere, comme elle le faisait dans les 
chapitres precedents (et notamment dans le chapitre VIII sur Line Edit). 
Remarque Aucun caractere n'est retourne quand une fenStre systeme est au premier 
plan. II semble preferable de recuperer le caractere tape dans le champ message de 
1'evenement plutot que dans le champ TaskData, qui est incorrect quand le bit n'est 
pas nul. 

• AutoKey chaque fois que cet evenement intervient, puisqu'elle ne le traite pas, A 
l'application de gerer le caractere en repetition. 

Remarque MenuKey n'est pas appelee pour un tel evenement, la vaieur du bit est 
done indiffe rente. 

» UpdateEvt dans les cas suivants : le bit 1 de TaskMask est k zero, ou bien la 
fenfitre a ete cre^e sans donner 1'adresse d'une procedure automatique de dessin de 
son contenu (champ wContDefProc de la ParamList). Une telle fen£tre ne peut pas 
posse"der de barre de defilement. L'application doit alors dessiner elle-meme le 
contenu de la fenStre dont le pointeur est precise dans TaskData, entre 1'appel aux 
routines BeginUpdate et End Update 

• ActivateEvt chaque fois que cet evenement intervient, puisqu'elle ne le traite pas. 
A l'application de gerer (ou de ne pas gerer) un tel evenement, le pointeur sur la 
fenetre incriminee se trouvant dans TaskData, 

• DeskAccEvt chaque fois que cet evenement intervient, e'est-a-dire quand 
1'utilisateur revient a l'application apres avoir utilise un accessoire de bureau 
ctassique, L'application n'a rien a faire. 

• wlnDesk chaque fois que FindWindow retourne cette vaieur, puisque cette 
occurrence n'est pas traitee. L'application fera comme elle fait d'habitude, vraisem- 
blablement rien. 

• wlnMenuBar dans les cas suivants : 

- le bit 3 de TaskMask est a zero et 1'utilisateur a clique dans la barre de menus 
systeme ; 
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- MenuSelect a ete appelee, un article a fite selection^ et doit Stre g^re par 
rapplieation (son identifiant est superieur a 255) ; 

- Menu Key a ete appelee, un article a €xi sSlectionne et doit etre ger£ par 
['application (son identifiant est supe'rieur a 255). 

Dans tous les cas, Task Data contient 1'identifiant de 1' article (mot-bas) et 
Tidentifiant du menu (mot-haut) auxquels 1'application doit r^pondre. 

• wlnContent dans les cas suivants : 

- si le bit 7 de TaskMask est a zero, des que FindWindow retourne wlnContent 
(la fenetre peut done 6tre ailleurs qu'au premier plan, TaskData contient le pointeur 
qui la designe) ; 

- idem si le bit 7 est a un, mais la fenetre est alors forcement la fenetre du 
premier plan (active). 

Quand le bit 7 est a un, un clic dans le contenu d'une fenetre non active provoque 
1'appel automatique de SelectWindow, Si le bit F£)CONTENT du champ wFrame de 
la fenetre est a un, TaskMaster retourne malgre tout wlnContent, de telle sorte que le 
clic qui a servi a active r la fenetre sert encore une fois. 

• wlnDrag si le bit 6 de TaskMask est a zero. Sinon, Drag Window est appelee avec 
des arguments par detaut (grille h 4 dans le mode 320, a 8 dans le mode 640, distance 
de grace a 8, le rectangle frontiere 6tant fixe a la totality du desktop disponible, moins 
quatre pixels de chaque cote). La fenetre est s£lectiorm£e si necessaire (a moins que la 
touche Pomme ne soit enfoncee au moment du clic souris). 

• wlnGrow si le bit 10 de TaskMask est k zero. Sinon, GrowWindow est appelee 
avec des arguments par delaut pour la taille minimale autorisee pour la region contenu 
(largeur 100, hauteur 40 en mode 320 comme en mode 640). 

• wlnGoAway dans les cas suivants : 

- le bit 8 de TaskMask est a zero (il est alors de la responsabilitS de 
1'application d'appclcr la fonction TrackGoAway) ; 

- le bit 8 de TaskMask est a un, et TrackGoAway, appe!6e par TaskMaster, a 
retourne TRUE. Dans ce cas, ['application doit fermer la fenetre dont le pointeur se 
trouve dans TaskData. 

On constate que dans tous les cas 1'application doit agir : TaskMaster ne peut 
prendre la responsabilite de fermer une fenetre, puisque 1'application est susceptible 
de provoquer quelques actions au prealable. Ceci ne concerne pas les fenetres 
systeme. 

• wlnZoom si le bit 9 de TaskMask est a z£ro. Sinon, TrackZoom est appelee, et si 
elle retourne TRUE, ZoomWindow est appelee a son tour. 

• wlnlnfo chaque fois qu'un clic souris intervient dans la zone d'informations de la 
fenetre de premier plan, puisque cette occurrence n'est pas trait£e. TaskData contient 
le pointeur sur la fenetre a laquelle la zone d'informations appartient. 
Remarque Quand on clique dans la zone d'informations d'une fenetre qui n'est pas au 
premier plan, cette fenetre est activee quel que soit 1'eitat du bit 7 de TaskMask. 

wlnSpecial quand ['application doit g£rer un article de menu dont ['identifiant est 
compris cntre 250 et 255 inclusivement, soit parce qu'il s'applique a une fenetre de 
1'application, soit parce qu'il s'applique a une fenetre systeme alors que le bit 12 de 
TaskMask est a zero, soit parce qu'un appel automatique a la fonction System Edit 
s'est solde par un echec. Rappelons que les articles speciaux sont Annuler (250), 
Couper (251), Copier (252), Coller (253), Effacer (254) et Fermer (255). 

• wlnDeskltem quand 1'application doit gerer un article de menu dont Tidentifiant 
est strictement inKrieur a 250 (le bit 4 de TaskMask est a ze'ro). L'application peut 
appeler elle-meme OpenNDA dans ce cas, 

• wlnFrame si et seulement si le bit 11 de TaskMask est a zero. Dans ce cas, le clic 
peut avoir eu lieu dans une barre de defilement, dans la partic gauche du cadre de la 
fenetre ou dans la barre de titre si la fenetre n'a pas le droit de se deplacer. (Si le bit 1 1 
est a un, cliquer ailleurs que dans une barre de defilement est completement ignore 
par TaskMaster, qui ne retourne meme pas l'evenement.) 
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Si le bit 11 est a zero et si I'utilisateur clique in frame dans une fenetre qui n'est pas 
active, celle-ci n'est pas activee automatiquement. Si la fenetre est active et que le clic 
s'est produit dans une barre de defilement, Task Master gere le defilement du contenu 
de la fenetre, en accord avec les diverses valeurs passes dans lei champs wScrollVer, 
wScrolIHor, wLageVer, wPageHor au moment de la creation de la fenetre ou fixes par 
la suite. 

Quand 1'application revolt wlnFmme, elle ne fait generalement rien. 

TaskM aster peut retourner une valeur negative quand le bit 5 de TaskMask est a 
zero. Dans ce cas, c'est a ('application de gerer l'accessoire de bureau qui se trouve au 
premier plan, en appelant SystemClick. 

Deux constantes nouvelles sont apparues dans cette liste. Nous pouvons les detlnir 
ainsi : 

ddofino wlnSpodal 25 

•define wlnDeskitam 26 

Sauf cas tres particulier, le masque Task Mask sera fixe au maximum de ses 
possibilites, c'est-a-dire a $00001 FFF dans la version 1.03 du Window Manager. Si par 
exemple une application decide de ne pas supporter les accessoires de bureau, inutile 
de toucher au masque ! II suffit de ne pas inclure 1' instruction FfxAppleMenu 11 serait 
toutefois regrettable de ne pas proftter des accessoires de bureau, puisqu'ils sont 
complement geres par Task Master si quelques regies simples sont respectees 
(concernant I'identifiant des articles speciauic, notamment). 

On masquera TaskMaster la ou les options par defaut qu'elle utilise ne s'accordent 
pas avec I* application (DragWindow, Grow Window...). 

Avec un masque maximal, 1'application ne recoit plus que les codes suivants : 

- MouseUp : 1'application a la responsabilite de gerer (ou de ne pas gerer) ces 
evenements ; 

- KeyDown ou AutoKey ; 1'application doit gerer le caraetere recti (champ 
message), elle est assuree Que la fenetre de premier plan lui appartiem et qu'il ne s'agit 
pas d'un equivalent -clavier d'un menu deroulant. Elle ignorera vraisemblablement eel 
evenement si elle n'utilise pas Line Edit ; 

- UpdateEvt : si la procedure automatique de dessin du contenu de la fenetre 
existe, 1'application ne recoit meme pas cet evenement (ce sera le cas si la fenetre 
possede des barres de defilement). Sinon, elle y repond classiquement ; 

- ActivateEvt : 1'application a la responsabilite de gerer (ou de ne pas gerer) ces 
evenements ; 

- wlnDesk : 1'application a la responsabilite de gerer (ou de ne pas gerer) un clic 
Mums dans le desktop ; 

- wlnMenuBar : un article est selectionne dans un menu deroulant, soil par la 
souris, soit par equivalent clavier. Ni 1'article ni le menu ne peuvent avoir un code nul, 
puisqu'on est sur qu'une selection valide a ete faite. L'article a un code supeneur a 
255. L'application doit repondre a la commande, avec une fonction de type ExecMenu 
par exemple ; 

- wlnContent : un clic souris a eu lieu dans la region contenu d'une fenetre de 
l'application et on est sur que cette fenetre est active. L'application repond a cet 
evenement comme elle 1'entend ; 

- wlnGoAway : I'utilisateur desire fermer une fenetre (qui appartient forcement a 
l'application). II a clique dans la case de fermeture et relache le bouton dans cette 
meme case. II est de la responsabilite de l'application de faire le neeessaire ; 

- wlnlnfo : un clic souris a eu lieu dans la zone d'informations d'une fenetre de 
l'application et on est sur que cette fenetre est active. L'application repond a cet 
evenement comme elle 1'entend ; 

- wlnSpecial : un article special concernant l'application a ete seiectionne. C'est 
soit la demande de fermeture d'une fenetre de l'application, soit un Annuler, un 
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Couper, un Copier, un Coller ou un Effacer. Si l'application ne gere pas le copier- 
coller, ces articles devraient etre estompes quand une fenetre de 1'application est 
selectionnee, de telle sorte que l'utilisateur comprenne qu'il ne peut pas s'en servir. 

L'application doit repondre a la commande, avec une fonction de type ExecMcnu 
par exemple. Rien n'empeche de partager ExecMenu entre les reponses a wlnMenu- 
Bar et wlnSpecial. 

Nous ne 1'avons pas dit, mais cela coule de source : quand TaskM aster recoil un 
evenement peu eourant, tels les evenements definis directement par ['application, 
qu'clle ne sait pas gerer, elle renvoie en code le type de I'evenement, A l'application 
de faire le necessaire ! Notons egalement que TaskMaster appelle elle-m&me 
SystemTask pour assurer le bon fonctionnernent des accessoires de bureau periodi- 
ques. 



Defilement du contenu d'une fenetre 



Ce n'est pas parce que TaskMaster gere automatiquement le defilement du 
contenu d'une fenetre qu'il faut « mourir idiot » et ne pas comprendre ce qui se passe. 
De plus, certaines applications doivent forcer le defilement, par exemple quand 
l'utilisateur fait glisser la souris en dehors de la fenetre (cas des applications 
graphiques, ou des tableurs). C'est pourquoi nous allons essayer de voir le 
fonctionnernent du mecanisme de defilement. 

L'tean definit un systeme de coordonnees, dites coordonnees globales. L'origine 
en est le coin superieur gauche de I'ecran. Quand on definit une fenetre, on en donne 
la region contenu, qui, pour une fenetre normale, est un rectangle. Les coordonnees 
de ce rectangle (globales) definissent la faille et la position de la fenetre a I'ecran, et 
autour de ce rectangle sera dessinee la region contour. Ce rectangle definit lui aussi un 
systeme de coordonnees, dites coordonnees locales. L'origine en est le coin supeneur 
gauche du rectangle. 

L'ecran est vu comme le rectangle frontiere (BoundsRect) d'une pixel image (la 
memoire ecran), la region contenu de la fenetre est vue comme le rectangle PortRect 
d'un grafport dont la pixel image associee est I'ecran. 

Dans la region contenu de la fenetre, une image doit etre affichee. Si elle est plus 
grande, elle n'est pas visible en totalite, mais elle ne deborde pas. Considerons une 
feuille de papier imaginaire qui aurait la taille de I'image complete, et une tres grande 
feuille de carton non transparent au milieu de laquelle un trou rectangulaire de la taille 
du contenu de la fenetre aurait ete fait (la lucarne). Si nous plagons la feuille de carton 
au-dessus de la feuille de papier, nous ne voyons plus qu'une partie de I'image a 
travers la lucarne : c'est cette partie visible qui est reportee a I'ecran (figure Xl.l.a). 




Figure Xl.l.a, L'«at iniliiil. Le contour pointing reprfaente la feuille dedessin, h rectangle grist 1'fcran et la 
lucarne k conlcnu de la fenltre. 
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Si nous ddplacons solidairement la feuille de papier et la feuille de carton, la mime 
partie de 1'image reste visible dans la lucarne, mais la luearne a change de position. 
C'est le deplacement d'une fenetre (figure XLl.b). 
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Figure Xl.l.b. Emplacement de la Fenetre par rapport a I'etat initial. 

Si nous d^placons la feuille de papier sous la feuille de carton (soil horizontale- 
ment, sort verticalement), cette derniere restant immobile, nous ne voyons plus la 
meme partie de 1'image : celle-ci defile a travers la lueame. Le defilement traduit done 
une translation horizontal ou verticale du dessin par rapport a la lucarne, mais la 
lucarne n'a pas change^ de position (figure XI.l.c). 




Figure XJ. I.e. Defilement de la fenetre par rapport a I'etat initial. 



Notre lucarne deftnit le systeme de coordonnees locales, origine en haul a gauche. 
La feuille de papier possede elle-meme son propre systeme de coordonnees relatives, 
origine en haut a gauche. A un instant precis, un point et un seul de la feuille de papier 
coincide avec le point origine du systeme de coordonnees locales. Pour faire action de 
defilement, il suffit done de dire que le point de coincidence a change, done qu'on fixe 
une nouvelle origine. 

QuickDraw offre une telle procedure : SetOrigin. Elle fait coi'neider 1'origine des 
coordonnees locales avec le point defini dans le systeme de coordonnees relatives (qui 
n'est autre qu'un deuxieme systeme de coordonnees globales), mais ne genere aucun 
evenement de mise a jour. On peut accompagner cet appel de ScrollRect, par 
exemple, et de InvalRgn pour generer le dessin de la partie apparue. II y a 
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malheureusement une difficult^ supple men la ire a prendre en compte : quand le 
Window Manager est invoque, l'origine de chaque fenetre doit obligatoirement etre le 
point (0,0) ! 

Voiei done comment le defilement est effects (au travers de la procedure de mise 
a jour passee a la creation de la fenetre) : 

Tout d'abord, Task Master fixe le bon grafport. 

Apres, la procedure QuickDraw SetOrigin est appelee pour fixer la bonne origins. 

Ensuite, on peut dessiner dans le systeme de coordonnees relatives (notre feuille 
de dessin), sans se preoccuper de ce qui sera visible ou pas, puisque ce dessin est 
effectue durant un ev^nement de mise a jour. C'est le role de notre procedure de 
dessin du contenu de la fenetre. 

Des que toute !a region visible a ete redessinee, l'origine est retablie a (0,0) par 
SetOrigin, mais la veritable origine est conserve e dans un coin de la mfi moire. 

Enfin, le grafport precedent est restaure. 

Cette complication est a l'origine de nombreux malentendus. Nous avons appele 
systeme de coordonnees locales le systeme dont l'origine est au coin superieur gauche 
du contenu de la fenetre, et systeme de coordonnees relatives celui dont l'origine est le 
coin superieur gauche de la feuille de dessin. Certains ne feront pas la difference. Peu 
importe. Ce qui est primordial, c'est de dessiner dans le systeme de coordonnees 
relatives alors que l'origine est correctement fixee, et de remettre l'origine k zero des 
qu'on a terming. 

L'ambiguite provient du fait qu'il y a deux sytemes de coordonnees glob ales pour 
un systeme de coordonnees locales. Quand on dessine sur une feuille de papier, cette 
feuille est r£eHement une pixel image dont les frontieres (BoundsReet) definissent un 
systeme global. La lucarne (le PortRect du grafport) ne definit qu'un systeme local. 
Quand on dessine dans la memoire ecran, 1'ecran d£finit un systeme global, et chaque 
fenetre un systeme local. II suffit de ne pas se perdre dans ces subtilites pour faire de 
jolis defilements ! 

Quand l'application voudra dessiner dans une fenetre qui contient des barres de 
defilement en dehors d'un evenement de mise a jour (cas des applications graphiques, 
par exemple), cette regie devra absolument etre respectee. C'est pourquoi le Window 
Manager met a notre disposition une procedure dedi6e, Star (Drawing Qn donne en 
argument un pointeur sur la fenetre dans laquelle on veut dessiner, et la procedure se 
charge de fixer le bon grafport et la bonne origine. Dans le cas ou une fenetre ne 
comporte pas de barre de defilement, la procedure SetPort suffit. Des que Taction de 
dessiner sera terminee, il faudra retablir l'origine a (0,0), avec toujours la procedure 
QuickDraw SetOrigin. 

Attention a l'emploi des procedures GetMouse, LocalToGlobal et GlobalToLocal, 
et en regie gengrale a tout ce qui touche aux coordonnees. La sequence : 

S*tPort(wind) ; 
GotHouse(Spt); 

donnera un point dans le systeme de coordonnees locales de la fenetre wind, alors 
que la sequence : 

StartD raw! ng( wind); 
GetMouse(Spt); 
SetOrigin (0,0): 

donnera un point dans le systeme de coordonnees relatives de la fenetre wind. Voir 
I'exemple en fin de chapitre. 

• Le Window Manager offre deux routines dont nous n'avons pas encore parle : 
GetCOrigin et SetC Origin. La fonction GetCOrigin retourne dans un entier long les 
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coordonnees relatives du point qui coincide avec le coin superieur gauche du rectangle 
contenu de la fenetre dont un pointeur est pass^ en argument (abscisse dans le mot 
haut, ordonnee dans le mot bas). La procedure SetCOrigirj permet de redessiner le 
contenu de la fenetre en accord avec l'origine pass£e en argument. Les barres sont 
r^ajustees en consequence, et l'origine est remise a (0,0). Seul inconvenient, aucun 
evenement de mise a jour n'est genere. C'est done a 1'application de le faire (vous 
souvenez-vous de la procedure InvalRect ?). Fabuleux pour forcer un defilement alors 
que l'utilisateur n'est pas en train de manipuler les barres de defilement ! On peut 
meme faire defiler une fenetre non active. 

Une precaution a prendre, toutefois, verifier que l'origine est un point possible, en 
fonction de la taille du dessin et de celle du contenu de la fenetre. Le Window 
Manager ne se posera pas de questions ; il fera ses calculs, et si l'origine est mauvaise, 
il risque de dessiner les curseurs de defilement en dehors des barres de defilement ! 

Le bout d'exemple suivant assume qu'on travaille avec deux fenetres suffisamment 
grandes pour que l'origine fixee reste dans des limites convenables. L'une est active, 
I'autre pas, elles possedent toutes deux, deux barres de defilement et obligatoirement 
une procedure automatique de dessin. On va faire defiler leur contenu simultan£ment 
et en diagonale, de cinq pixels chaque fois, et revenir k la position initiale, l'utilisateur 
restant simple spectateur ! 



On remarquera comment les ev^nements de mise a jour sont g6neres, et surtout 
comment ils sont traitSs au sein de la boucle : on appelle TaskMastcr avec un masque 
d'ev£nement limitant son fonctionnement aux seuls evenements de mise & jour, tant 
que de tels evenements sont disponibles. C'est TaskMaster qui appelle la procedure de 
dessin du contenu de la fenetre ! 
Note Cette fonction pourra etre integree dans I'exemple en fin de chapitre. 



defilautof ) 
{ 



SetReet(8r, 0, 0. 1000. 1000); /* on fixe un rectangle arbitrairement grand */ 
for (i-0; MQ; ++i) 

{ 

SetCOrigln(5*i, 5*t, fenl); f origirte changee, barres redessindes 7 

SetPort(fenl); lnvalRect(&r); /* contenu de la fenetre 1 entierement invalids 7 

SetCOrigln(5*i, 5*i, fen2); /* idem fer*3tre 2 V 

SetPort(fen2); lnvalRect(&r); 

while (E.ventAva\\(UpdaieMask. &tache)) Ta»kMasler(UpdateMasfc, itache); 

} 
for (i=40; i>-0; i-) I" idem en sens inverse 7 

{ 

SetCOrigtn{5*i, 5*t, fenl): 

SetPort(fenl); lnvalReet{&r); 

SetCOrigln{5*i, 5*i, fen2); 

SetPort(fen2); lnvalRect(Sr): 

while (EventAvail(Upd3teMas*(. &tache)) TaskMastarf UpdateMask, &tache); 

} 



Une autre solution etait de dessiner soi-meme, en employant la sequence suivante 
(oii Paint est la procedure qui dessine le contenu des fenetres) : 

SetCOrigln(5*i, 5*i, fenl }; f on fixe une nouvelle origine 7 

StartDrawlng(fenl); f on fixe le bon grafport, avec la bonne origine */ 

PainK, }; f on dessine 7 

SetOrlgin(0,0}: /* on r^tablit (0,0} quand on a temiine' 7 



300 I BOlTE A OUTILS DE L'APPLE IIGS 



• En mode 640 (et uniquement dans ce mode-la), nous savons que la couleur d'un 
pixel depend de sa position horizontale a l'ecran (voir le chapitre III). Supposons que 
nous nous amusions a creer des patterns de couleurs pour definir des teintes plus 
agreables que les teintes par ddfaut dans ce mode. Ces patterns n'auront pas la meme 
apparence si les pixels qui les utilisent sont alignes sur des frontieres de mots ou pas. 

Requital : quand on d^place une fenetre ou quand on fait defiler son contenu, le 
dessin a 1'interieur risque de changer de couleur inexpliquablement ! {Voir I'exemple 
avee les formes en fin de chapitre VI.) Pour eviter ce genre de desagr6ments, le 
Window Manager nous offre une procedure. SetOrgnMask. Elle n'a aucun effet sur le 
deplacement d'une fenetre, puisqu'elle agit uniquement sur ia composante horizontale 
de l'origine : en cas de defilement, l'origine sera forced a rester sur certaines 
frontieres. Le premier argument de SetOrgnMask agit comme un masque ; un « et 
logtque » est effectu£ entre ce masque et la coordonnee horizontale de l'origine, le 
second argument d^signe la fenetre. La valeur par defaut du masque est SFFFF, done 
le masque est neutre, l'origine n'est pas affect£e. Pour forcer une abscisse de l'origine 
paire (dernier bit force" a 0), on utilisera $FFFE ; pour une abscisse multiple de 4 (les 
deux derniers bits forces a 0), le masque sera $FFFC ; pour une abscisse multiple de 8 
(les 3 derniers bits forces a 0, ce qui garantit I'integritS de tous les patterns, puisqu'un 
pattern est defini sur huit pixels horizontaux), le masque sera IFFF8, Inutile d'aller 
plus loin ! 

La sequence suivante (ou wind d^signe une fenetre avee barres de defilement) : 

S«tOrgnMasx(0xFFF8, wind); 
SetCOrigln(53, 31 , wind); 

forcera I'jrigine a (48,31), garantissant une couleur conforme a tous les patterns. 
Un exemple concret d'utilisation est donn£ en fin de chapitre. 



Procedure de mise a jour du contenu d'une fenetre 

Des qu'une fenetre possede des barres de defilement, elle est obligee de posseder 
une procedure qui dessine le contenu de la fenetre, de la meme maniere que des 
qu'une fenetre possede une zone d 'informations, elle est obligee de posseder une 
procedure qui dessine le contenu de cette zone. L'analogie est parfaite, a la difference 
que la procedure de mise a jour ne doit recevoir aucun argument. 

Par I'intennecliaire de cette procedure, 1'application va faire son dessin, complet, 
dans le systeme de coordonnees relatives. Le Window Manager appellera cette 
procedure dans deux cas precis : 1'utilisateur a clique dans une barre de defilement et 
le contenu de la fenetre doit defiler, ou bien une partie de la fenetre vient d'etre 
rendue visible et doit etre rafrakhie. Dans les deux cas, il s'agit d'une mise a jour, 
dans les deux cas le Window Manager va operer comme expliqu£ plus haut : il fixe le 
bon grafport, il fixe la bonne origine, il utilise la procedure pour dessiner la partie a 
mettre a jour (la region invalide), il retablit l'origine a (0,0) et il restitue le grafport 
precedent. 

Comme avee la procedure de dessin de la zone d 'informations, on ne peut pas faire 
n'importe quoi, car l'environnement au moment de I'appel de ces procedures est 
propre au Window Manager, et 1'application n'est plus capable de retrouver ses 
propres variables directement (probleme d£ja £voqu£ de page directe et de data bank 
register). 

Une fason d'agir pourra fitre la suivante, en attendant des compilateurs C capables 
de r£soudre ce probleme : on fait une procedure qui ne comporte qu'une instruction, 
un appel a une fonction C qui fera rfellement le dessin. Par exemple, si Paintl et 
Paint2 sont les procedures de mise a jour de deux fenetres dont le contenu est une 
picture QuickDraw reper£e par un handle (disons pictl et pict2), on pourra £crire 
quelque chose du style (ce n'est qu'un exemple) : 
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Harrile pictl , pict2: F ce sont des variables globales */ 

pascal void Paintl ( ) /* procedure fenetre 1 7 

( 
dessine(ipictl); 

) 

pascal void Paint2( ) /* procedure fenetre 2 */ 

{ 

dessine(Spict2) 

] 

dessine(phdl) /* procedure commune */ 

Handle *phdl; 

{ 

Fleet t; 

SetRsc!(4r,.,.); 
DrawPlcture(*phdl, Sr): 
) 

DEUXEXEMPLES COMPLETS 



Affichage des coordonnees (nouvelle version) 

Nous avons vu en fin de chapitre V un exemple d'applieation oil les coordonnees 
locales et globales du poinreur etaient affich&s en permanence dans la barre de 
menus. Nous reprenons cet exemple avec quelques variantes, et surtout avec la 
gestion du defilement par TaskMaster. Nous affichons cette fois les trois sytemes de 
coordonnees : coordonnees globales (origine en haul a gauche de l'ecran), coordon- 
nees relatives (origine en haut a gauche du dessin) et coord onne'es locales (origine en 
haut a gauche de la region contenu de la fenetre). On remarquera 1'emploi de 
StartDrawing et de SetOrigin, routines sur lesquelles s'articule tout l'exemple. 

Le contenu de chaque fenetre etant la juxtaposition de trois rangees de cinq cartes 
de 100 pixels de cote, tous de couleurs differentes, il est facile de repirer les 
coordonnees relatives ! De plus, le defilement est fixe a 10 pixels pour les fleches, 
100 pixels pour les bandes. 

Par dessin direct, nous affichons en permanence dans la zone d' informations de la 
fenetre de premier plan la valeur retournee par GetCOrigin, qui est done le point en 
coordonnees relatives qui correpond a 1'origine des coordonnees locales. Puisque la 
procedure appelee par le Window Manager pour dessiner automatiquement la zone 
d'informations ne fait rien, il n'y a aucune chance de voir apparaitre le moindre 
message dans la fenetre au second plan ! 

Seule difference entre les deux fenetres : le bit F.FLEX du champ wFrume est a 
zero dans la fenetre 1 , et a un dans la fenetre 2. Voyez-vous la difference ? Tentez 
1'experience suivante : pour chaque fenetre, faites defiler jusqu'a visualiser le coin 
inferieur droit du dessin (les deux barres de defilement sont done en position 
maximale), puis agrandissez la fenetre. Dans le cas de la fenetre 1, le dessin est refait 
proprement. Dans le cas de la fenetre 2, le dessin n'est pas refait, mais la zone des 
donnees est agrandie, laissant des bandes blanches a droite et en bas du dessin... 
bandes qu'on ne peut plus faire disparaitre. C'est cela, la flexibilite des donnees ! 
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Figure XI.2. l.'ecran dc rexemple. 



#define mode 



#include <tools.hs 
#include <entete.h> 



r si mode 320. 1 si mode 640 V 

/* definition des termes en gras '/ 
/* definition des termes en italique V 



void lnfo{ J; f dessin des zones d'information */ 

void Painl( \\ /* dessin des regions conlenu V 

int colfenf ] = {0 , 0x0 F00 ,Ox020F,Qx F0 FQ , 0x00 FQ} ; /* coule ur des fene tres */ 

ParamUst maFenl - { 

sizeoffParamLisf), QxSDBO, "\13 Fenetre 1 ", 1 L, 

{56. 2,187, 302+320* mode}, colfen. 0, 0, 

300,500, 131,300+320*mode, 

10, 10, 100, 100, 

OL, 30. 0L, Info, Paint, 

{60,20,130, 196+320'mode), -1L, Of. }; 

ParamUst maFen2 - { 

sizeof(Paramiisf), OxSFBO, "\13 Fenetre 2 ", 2L, 

{46, 2,187, 302+320*mode}, coifen, 100, 100, 

300, 500, 141, 300+320'mode, 

10, 10, 100, 100, 

0L, 20. 0L, Info, Paint, 

{80,40,145. 216+320Tnode}, -1L, 0L }; 

r definition d H un ourseur ' 
I" 5 lignes de 3 mots 7 



char croix[ ] ■> { 5,0,3,0, 

0,OxFO,0,0.0,0, 

0,0xF0, 0,0,0,0, 

0xFF,OxFF,0xF0.O,0,0, 

0,0xF0, 0,0,0,0, 

O.OxFO, 0,0,0,0, 

0,0,0.0,0,0, 

0,0,0.0,0,0, 

0,0.0,0,0,0, 

0,0,0,0,0,0. 

0,0,0,0,0,0, 

2,0,2,0 ); 

TaskHoc tache; 



T image 7 



r d^but du masque V 



f point ohaud */ 

r* oe que manipule TaskMaster V 
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Pointer 
Handle 
Pointer 



(en1. fen2, wind; 
indie = TRUE ; 

menu Port: 

cont; 

arrow; 



r pointeurs sur 1en§tre 7 

I* indicaleur de fin de boucle 7 
f Menu Manager port 7 
f handle sur region contenu */ 
r le curseur en lorme de fleche 7 



i PROGRAMME PRINCIPAL — */ 



mainO 
{ 



code; 
my ID; 



;" code retourne par Task Master 7 
r identiflant de Implication 7 



mylD = debutappl(inode); 
fenl = NewWlndow(SmaFen1); 
fen2 = NewWindow(KmaFen2); 
menuPort = GetMenuMgrPort( ); 
SetPort(menuPort); 
SetTextMode(O): 
arrow = GetCureorAdr( ); 
tache. TaskMask = 0x00001 FFF; 
Flush Events(£Very£ vent, 0); 



r debut standard 7 

f ouverture fenetre 1 7 

r ouverture fenetre 2 V 

I* on rticupere le menu manager port* I 

f on lui impose le mode Copy 7 
I* on garde I'adresse du curseur systeme */ 
I* on fixe le masque maximal a Task Master *. 
I* on supprima tous las ev^nemants en attente 7 



r defilauto( ) 



on peul appeler ici celte fonction defrnie plus haut, 

pour assister a du defilement automatique, si on le desire 7 



do ( 



code = TaskMasterjEveryEVen/, & tache); 
AffichCoord( ); 
AjusteCurs( ); 
if(lcode) continue; 



f traitement de I'evenement suivant ' 
P affichage des coordonnees 7 
r dessin du curseur ajuste 7 
r pas d'ev6nement a trailer 'I 



switch(code) 
[ 
case KeyOown ; 

indie ■ FALSE ; 

break; 



r une louche enloncee... 7 

f ...on quitte I'application 7 



case AclivaleEvt : I* un evenement d'activation ou de deactivation "/ 

i[(tache. modifiers & Active flag) C si activation... *l 

cont - GatContRgn (tache. TaskDa fa); /* .. on calcule la region contenu. . . 7 
break; !' ...de la fenetre acth/ee 7 



while) indie); 
quitter(mylD); 



\ 

f 

AffichCoord( ) 

i 

Point pt, pt2; 
char msg[20]; 
Pointer port; 
long orig; v 
flecf r; 



' FONCTION AFFICHCOORD: afficha les coordonnees souris 

dans trois systemes diffeVents ' 



r deux points 7 

t la fenetre active */ 
I* equivalent point 7 
r un rectangle V 



port = FronfWlrKtow(); 
orig ■ GatCOrigln(port); 



r on memorise la fenetre active 7 
f on re 1 cupere la bonne origine V 
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StartlnfoDrawlng(&r, port); f on va ecrire dans la zone ^information 7 

MoveTo(10, r, bottom- 13); DrawCString("OrigineT ; 

sprintf(msg. *x-%4d. y=%4d * getbits(orig,31,16), getbits{orig,15,16)): 

MoveTo(10, r boftom-3); DrawCStrlng(msg); 

Endlnfo Drawl ng{ ); r on a lini d'ecrire dans la zone d'information */ 

StartDrawlng(port) ; r on fixe le bon grafport et la bonne origins 7 

GetMouse(&pt2); f le point en coordonnees relatives */ 

SetOflgln(0, 0); r on retablit Torigine en (0.0) */ 

GetMous»(&pt); /* le point en coordonnees locales 7 

SetPort(menuPort); r on va ecrire dans ia barre des menus. .. 7 

sprintf(msg, '%4d ". pl.H); 
MoveTo(240,10): DrawCString{msg}; 

sprintf(msg, "%4d ", pt. V); f ...les coordonnees locates 7 

MoveTo(260,10): DrawCString(msg); 

spfintf(msg, "%4d ", pl2.H); 

MoveTo(125,10); DrawCStrirtg(msg); 

sprintf ( msg . " %4d ' . p(2, / ) : /* ... les coordonnees relatives 7 

MoweTo(165,10); DrBwCString(msg): 

sprintf(msg, "%4d * getbils(tache,m F jara,31,16)); 

MoveTo(1Q.10); DrawCStrlng{msg): 

sprintf(msg, "%4d ", getbits(tache. where, 15.16)); /*...les coordonnees globales 7 

MoveTo(50, 10); DrawC String(msg) ; 



' FONCTION AJUSTECURS: ajuste le dessin du curseur 

en fonction de sa position a I'ecran ' 



AjusteCursf ) 
{ 

static modif; 
int ind; 

nd - PttnRgn(&tache. where, cont); r est-il au dessus du contenu de la fenetre active? */ 
f (ind — modif) return; 
f (ind) SetCursor(croix); 
else SetCursor(arrow); 
modif = ind: 



/***** FONCTION GETBITS **"*/ 
getbitsfx.p.n) /*" prend n bits k partir de la position p " 

unsigned long x; 

unsigned int p.n; 

( relum( (x»(p+1-n)) & -(-0«n) ); } 

r"" PROCEDURE PAINT: dessine le contenu des fenetres ' 
void Paint( ) 



i = 0; 



SetRect(fir.O,0, 1 00,1 00); Tie rectangle initial 7 

for{k-0; k<3; ++k) 

f 

for(j=0;j<5:++j) 
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( 

SetSolldPenPat(++i) ; f une nouvelle couleur 7 

Paint Re«(& r) ; /* on peint le recta ngle . . . 7 

OffsetRect(Sr,1 00,0) ; r . . .et on le deplace 7 
) 

Off»BtRect(4r,-S00,100); r on passe a la ranges suivante 7 



/"*** PROCEDURE INFO: dessine les zones ^information ' 
pascal void lnfo(bar,data,wnd) 
iong bar, data, wnd; 



r on ne fait rien V 
1 

Manipulations avec TaskMaster 

Void I'exemple le plus acheve de cet ouvrage (mime s'il est susceptible de contenir 
quelques bogues de par la liberie Iaissee a J'utilisateur), celui qui offre les possibilities 
les plus interessantes pour decouvrir le fonctionnement de la bolte a outils de 
I'Apple IIGS. La tailie des donn^es manipulees est relativement importante (on gere 
quatre dialogues et une alerte, trois fenetres normales, des menus deroulants..,), ce 
qui justifie la separation du code en deux parties : un fichier « data », qui contient la 
definition de toutes les donnees utilisees par 1'application, et un fichier « instruc- 
tions », qui contient toutes les instructions en langage C. Pour definir la frontiere 
entre les deux, mettez-vous a la place d'une personne qui serait chargee de traduire 
votre programme dans une langue Strangere ; il ne faudrait pas qu'elle ait a toucher le 
moindre caractere dans la parti e « instructions ». 

Cet exemple ne fonctionne qu'en mode 640, certaines fenetres de dialogue 
depassant la largeur de 320 pixels, II va permettre de comprendre le fonctionnement 
de TaskMaster, en permettant en direct le parametrage du champ TaskMask. A 
gauche de I'ecran, une fenetre affiche en permanence les caractenstiques des cinq 
demiers codes renvoyes par TaskMaster : le code lui-meme, le type d'evenement qui 
I'a genere et le contenu du champ TaskData. Avec le masque maximal, on verra 
principalement des MouseUp et des evenements d'activation sur les fenetres, Cette 
fenetre d'informations possede une routine de mise a jour qui ne fait rien : elle ne sera 
done pas rafraichie si une fenetre vient a la recouvrir. On ne peut pas la fermer, on ne 
peut pas la deplacer. 

Deux autres fenetres sont prdsentes. Elles peuvent etre ouvertes et ferm£es a 
volonte, mais ce qui est remarquable, e'est que leur region contour peut etre modifiee 
a volonte par l'utilisateur ; suppression de la zone d'informations ou de la barre de 
titre, passage en type alerte, etc. On pourra ainsi tester toutes les combinaisons 
possibles, et constater que la case de contrflle de tailie est une eiitite plutot 
capricieuse ! Souvenez-vous, nous avions deja eu des ennuis dans le chapitre V avec la 
fenetre contenant des ovales (elle possedait une case de controle de tailie et une barre 
horizontale, mais pas de barre verticale). La rdgion contour n'est pas memorisee si la 
fenetre est fermee. Sa reouverture se fait comme elle a €t€ definie a I'origine. 
Note La valeur etant prise avant I'ouverture de la fenetre de dialogue, le bit 
FMILITED est toujours positionne. Nous avons interdit la modification des bits 
FJilLITED, F.ZOOMED, FJlLLOCATED et F.V1S. 

Le contenu de ces fenetres est une serie de traits epais en diagonale, chacun realise 
avec un pattern different. Ce qui nous donne la possibility de constater la dependance 
de la couleur d'un pixel vis-a-vis de sa position horizontale a I'ecran en mode 640. 
Bien que la procedure de dessin soit la meme pour les deux fenelres, les couleurs 
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afftchees ne sont pas identiques. En effet, l'une a ete ereee sur un pixel pair, [autre sur 
un pixel impair. Et si on fait defiler le contenu, les eouleurs changent. C'est pourquoi 
un dialogue permet de fixer pour chaque fenetre la valeur du masque de la 
coordonnee horizontale de 1'origine. Du fait que nous utilisons la palette standard des 
eouleurs en mode 640, un masque forgant les multiples de 2 suffit a re"tablir un 
defilement correct. Ce masque est memorise, meme si la fenetre est fermee puis 
rouverte. 

Remarque L'unite de defilement horizontal a ete fixee a 7 pixels pour la fenetre 1 ; si 
le masque n'autorise que les multiples de 8, elle ne pourra pas defiler en utilisant la 
flee he droite ! 

La zone d'informations contient le seul libelle « zone d'informations », invariable. 

Le titre de chaque fenetre peut etre modifie grace a un troisieme dialogue. Jusqu'a 
20 caracteres sont autorises, et puisque nous ecrivons directement & Fadresse oil la 
fenetre stocke le litre, celui-ci est m6moris6 de maniere permancnte, meme si la 
fenetre est fermee puis rouverte. 

Une autre fenetre de dialogue permet de modifier le champ TaskMask pour tester 
le comportement de TaskMaster dans diffcrcntcs situations. Les 13 bits definis sont 
accessibles, mais on fera attention a certaines combinaisons, Parexemple, I'utilisateur 
se bloque completement s'il interdit a la fois la gestion automatique de MenuSelect et 
MenuKey : il n'y a plus moyen de choisir un menu deroulant ! Pratiquement tous les 
articles possedent un equivalent-clavier. Souvenez-vous qu'ils sont inop^rants quand 
une fenetre d'accessoire de bureau est situ£e au premier plan, etat de fait desolant qui, 
nous 1'esperons, sera bientdt modifie par Apple. 

Les accessoires de bureau sont geres par TaskMaster... a condition que le champs 
Taskmask le permette. L'application ne gere pas le copier-coller, pour ses propres 
fenetres. De plus, dans le menu * , 1'article « A propos de » est gerri. Une alerte 
toute simple pour donner a I'utilisateur toutes les informations interessantes (ou 
plublieitaires) concernant l'application. On notera un bogue irritant dans TaskMas- 
ter : quand cette fonction gere elle-m£me la response a une commande dans un menu 
deroulant (cas des articles speciaux), elle oublie d'appeler HiliteMenu pour rendre au 
titre son aspect normal ! 




Figure XI .3. Un morceau d 'reran tire de I'exemple. 

FICHIER EXTM.DATA: les donnees necessaires a l'application •«*•**•"••/ 

r definition des menus deroulants 7 



charMenu1[] = "> @\\XN1"; 
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char Menul 1 [ ] - "- A propos de . . .\\N256V*Aa"; 

char Menul 9[j - *. "; 

char Menu2[ ] = "> Fichier \\N2": 

char Menu21[ ] - •- Ouvrir 1en1\\N257'1 "; 



char Menu22J j ■ " 


- Ouvrir !en2\\N2SS*2 '; 


char Menu23[ ] = " 


Fermer\W255*Fr; 


char Menu24[ ] ■ * 


-QuillerUN260*Qq"; 


char Menu29[ ] - " 




char Manu3[ j ■ "a 


Edition \\N3"; 


char Menu31[ ) . " 


■ Annuler\\M250V*Zz": 


char Menu32[ ] • " 


Couper\\N2S1*Xx"; 


char Menu33[ ] • " 


■ Copiert\N252*Cc': 


char Menu34[ j = " 


- Collert\N253*Vv"; 


char Menu3S[ j ■ " 


■ Erfacer\\N254-; 


char Menu39( ) - " 




char Menu4[ ] - "> 


Special \W; 


char Menu41[] = " 


- Fixer TaskMask..A\N301 'Mm"; 


char Menu42[ ] = " 


■ Fixer Orgn Mask. \\N3Cr2*Oo"; 


char Menu43[ ] ^ "■ 


Fixer wFrame .. \\M303*Ww": 


char Menu44[ ) - " 


Changer le Btre. . .\\N304*Tt"; 


char Menu49[ j = " 


r 

256 


#dofine iAbout 


#define iFenl 


257 


•define iFen2 


258 


#deline iFermer 


255 


•define iQuitter 


260 


•define FTM 


301 


Adeline iSOM 


302 


•define i Frame 


303 


•define iTilre 


304 


void updFenO( ); 


void Paint( }; 


void Infoi. ); 





r definition do quelques constantes V 



r declaration de trois procedures 7 



int colfen[ ] - (0, 0x0 F00, 0x020 F.OxFOFO.OxOOFQ}; f cou lours des fenetres 7 

char infoStr( ] - "Zone d'information": I" une chains de caracleres */ 

I" definition de la fenetre d'information V 
ParamUst maFenO - { 

siz.oot(ParamLisl), 0x0020, "", 0L. 

(0,0,0,0), coffen, 0, 0, 

0,0.0,0, 

0,0,0,0, 

0L, 0, 0L, 0L, updFenO, 

{12,0,201,100}, -1L, QL}; 

r definition de la fenetre 1 */ 
char titre1[22] - "\13 Fenetre 1 "; 
ParamLisf maFenl -{ 

sizeof( ParamUst), OxDDBO, litre 1, 1L, 

(45,110,186,610), colfen, 0, 0, 

300.600, 141,496, 

7.7,77,77, 

0L, 15, 0L, Info, Paint, 

(50,120,130,570), -1L,0L); 

char titre2[22] - 113 Fenetre 2 "; 
ParamUst maFenZ - ( 

siieoffParamiisr). QxDDFO. titre2, 2L. 

(45,110,186,610), coffen, 0,0, 

300,600,141,496, 

1 1 , 1 1 , 99, 99, 



r definition de la fenetre 2 7 
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OL, 15, OL, Info, Paint. 
{75,141,165,570}, -1L.0L); 



charpal[8][16] = { 



{0x77,0x 77,0x77,0x77,0x77,0x77,0x77 ,0x77, 
0x77,0x77,0x77,0x77,0x77,0x77,0x77,0x77}, 



{OxBB.0xBB,0xBB,0xBB,0xBB,0xBB,0xBB,0xBB, 
0xBB,0xBB,0xBB,0xBB,0xBB,0xBB,0xBB,0xBB), 



{0xDD,GxDD,0xDD,0xDD,0xDD,0xDD,0xDD,0xDD, 
0xDD,0xOD,0xDD,0xDD,0xDD,0xDD,0xDD,0xDD}, 



{0xEE,OxEE,OxEE,0xEE,0xEE,OxEE,OxEE,OxEE, 
0xEE,0xEE,0xEE,0xEE,0xEE,OxEE.0xEE,0xEE), 



(0x66,0x66 ,0x66,0x66 ,0x66,0x66,0x66 ,0x66, 
0x66,0x66,0x66,0x66,0x66,0x66,0x66.0x66}, 



{Ox7D,Ox7D,Ox7D,0x7D,Ox7D,Ox7D,0x7D,0x7D, 
0x7D,0x7D,0x7D,0x7D,Ox7D,Ox7D,Ox7D.Ox7D}. 



r definition des huit patterns utilises */ 

r rouge/blanc */ 



r vert/blanc 7 

r blanc/bleu 7 

r blanc/jaune 7 

r rouge/jaune */ 

r rauge/blanc/blanc/bleu 7 

r rouge/blanc/vert/blanc */ 



{Ox7B,Ox7B,Ox7B.Ox7B,Ox7B,0x7B,0x7B,0x7B, 
Ox7B,Ox7B,0x7B,0x7B,Ox7B,Ox7B,Ox7B,0x7B}, 

I* Wanc/Nane/rouge/jaune/noir/noir/rouge/jaune 7 
{0 x F6 ,0x06, Ox F6 , 0x06 ,0x F6 ,0x06 .Ox F6 .0x06 , 
x F6 ,0 x06 ,0x F6 ,0x06,0x FG ,0x06 , Ox F6 , 0x06) 

}; 

I* definition de i'alerle "A propos de, . ," V 
ItemTemplatB bCK-(1,{100,110.120,190), Buttonltem, 120K", 0, 2, 0L}; 
ItemTemplatB Iig1-(2,{10,10,25.290}, StatTaxt+ ItemDisabio. 

144Exemple ecrit par Jean-Pierre CURCIO", 0, 0, 0L}; 
ItemTemplatB ligg.{3,{30 ,60,45,290), StatTexr + ItemDisabla, 

ISOpour illustrer louvrage", 0, 0, 0L); 
ItemTemplats lig3-{4,{50,20,65,290}, StetTaxt+ ItemDisabla, 

■WLA BOITE A OLTTILS DE L'APPLE IIGS", 0, 0, 0L); 
ItemTempta te Iig4 ={5, ( 70 , 90 ,85 ,290} , StatText + ItemDisabla, 

121(Editions du PSI)", 0, 0, 0L); 

AlertTemptatB about- { (40,1 72,170,468), 1 , 0x80, 0x80, 0x80, 0x80, 

(SbOK. Sligl, Klig2, &lig3, &lig4, 0L}}; 

T definition du dialogue "Rxer TaskMask..." */• 
ItemTemplatB TMOK«{1 , (1 35,1 0,1 55,90), Buttonltem, "\20K", 0, 2. OL); 
ItemTempisIs TM annul«(2, (1 35,270, 1 55, 350) . Buttonltem, "\7Annuler",0,2,0L); 
ItemTemplatB ™txt1-(3,{135.120,145,260}, StatText + ItemDisabio, 

120Nouvelte valeur:". 0. 0, 0L}; 
ItsmTemplatB TM txt2«{4 ,{ 1 45, 1 50 , 1 55,250} , Sla tTaxt ♦ ItemDisabla, ", 0, , L) : 
ItemTemplatB TMtxt3-(5,[1 ,50,1 0,350}, SiarTexr+ ItemDisabla. 

136Changer le mot bas de TaskMask", 0, 0, 0L); 
ItamTemplate TM0-(10, {10.1 0,24, 1 80), ChackilBm, 101 20: MenuKey", 0,0, 0L}; 
ttamTemptatB TM1 -{11 , {25,10,39,160), Checkltam, 101 1 1 : Update", 0, 0, 0L); 
ItemTemplatB TM2-{12, {40,10,54,180}, Checkltam, 10152: FindWindow", 0, 0. 0L}; 
ItemTamplata TM3.(13, (55.10.68.180), Checkltam, 10153: MenuSelect", 0, 0, 0L); 
ItemTamplate TM4-{14. {70,10,84,180}, Cheekltem, "\0124: OpenNDA", 0, 0, 0L}; 
ItamTemplate TM5-{1 5, {85, 1 0,99, 1 80}, Cheekltem, 101 65: System Click", 0, 0, 0L}; 
ItemTamplate TM6={16, {100,10,1 14,180), Cheekltem, 10156: DragWindow", 0, 0, 0L}; 
ItemTemplatB TM7«{17, (115,10,129,180}, Cheekltem, "«177: SeteotWindow". 0. 0, 0L}; 
ItemTemplata TM8-{ia. (1 0,190,24.350}, Checkltam, "W168: TrackGoAway", 0, 0, 0L}; 
ItemTamplate TM9-{19, {25,190,39,350}, ChBckltem, 10149: TrackZoom", 0, 0, 0L}; 
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ItemTemplate TM10=(20, {40,190,54,350}, Checkltem, "\015A: GrowWindow", 0, 0, OL); 

ItemTgrnptatB TM1 1 ={21. (55,1 90,69,350}, Checkltem, "\015B: defilement", 0, 0, OL); 

ItemTemptate TM12=(22, {70,190,84,350}, Checkltem, "\013C: speciaux". 0, 0, OL}: 

ItemTemplate TM13={23, {85,190,99,350), Checkltem, "W14D: inutilise", 0, OxFFOO, OL}; 

ItemTemplata TM14=(24. (100,1 90,1 1 4,350}, Checkltem, "\014E: inutilise", 0, OxFFOO, OL}; 

ItemTemplata TM15-(25. (115,190,129,350}. Chackltam. "\0\AF: inutilise", 0. OxFFOO. OL}; 

DiahgTemplatB TMdlg={ (25,140,190,500}, TRUE, OL, 

(4TMOK, ATMannul, STMtxtl , &TM1X12, STMtxt3. 

&TM0, &TM1 , &TM2, &TM3. &TM4, &TM5, KTM6, &TM7, KTMB, 

&TM9, &TM10, &TM11, &TM12, &TM13. 8TW14. &TM15, OL}): 



r definition du dialogue "Fixer OrgnMask.. ." 7 
ItemTemplata OMOK={1 , (130,10,150,90), Buttonltem, "£OK", 0, 2, OL}; 
ItemTemplata OMannul={2 , (1 30, 1 30, 1 SO , 210), Buttonltem, '\7 Annular", 0.2.0 L} ; 
ItemTemptata OMtxtl ={3,(1 1 0,20,1 20,1 50}, StatText + ItemDisable, 

"\20Nouvelle vateur:", 0, 0, OL); 
ItemTamplata OM txt2 - (4 ,( 1 1 , 1 50 , 1 20 , 1 90} , Stetrexf 4^temDfea We, "", , 0, L) ; 
ItamTsmplatg OMtet3-{5,( 1 0,30,20,200), StatText + ItemDisable, 

"\24Faire un SetOrgnMask", 0, 0, OL}; 
ItsmTemptate OM0=[10, {35,35,49.200}. Radiottem, "\01 5Pas de masque". 1 , 1 , OL); 
ItemTemplata OM1-(1 1, (50,35,64,200). Radiottem, "«1 5Multiple de 2", 0, 1 , OL); 
ItemTemplata OM2-{1 2, (65,35,79,200}, Radiottem, "\01 SMultiple de 4". 0, 1 , OL); 
ItemTemplata OM 3={ 1 3, [80, 35 ,94 ,200) , Radiottem, "\0 1 5M ultiple de 8" . . 1 , L) : 

DiahgTemplatB OMdtg-{ (30,210,190,430), TRUE, OL, 

{&OMOK, SOMannul, SOMtxtl, SOMtxt2, SOMbstS, 
&OM0, SOM1, SOM2, S.OM3, 0L}}: 

r definition du dialogue "Changer le litre.. ." */ 
ItemTemptate TITOK={1, (60,10,80,90), Buttonltem, ^OK", 0, 2. 0L}: 
ItemTemptate TITarmut={2, {60,150,80.230}. Buttonltem, "\7 Annular", 0, 2, 0L); 
ItemTemplate TITlxt-{3, (10,10,20,230), StatText* ItemDisable, 

"\35Nouveau titre pour la fenfire", 0, 0, 0L); 
ItemTemplatB TITline.{4, (30,1 0,45,230}, EditUne + ItemDisable, ", 20. 0. 0L}: 

DiahgTemptate TITdlg-{ (30,200,120,440), TRUE, 0L, 

{STITOK, STITarmul, STITtxt, &TITIine, 0L) }; 

T definition du dialogue "Fixer wFrame..." 7 

ItemTemplate wFOK=(1 , {135,10,155,90}, Buttonltem, "\20K", 0, 2, 0L}; 

ItemTemptate w Fannul={2 , { 1 35 ,270 , 1 55 ,350) , Buttonltem, VAnnu tor", , 2 . OL) ; 

ItemTemptate wFtxtl .{3 . { 1 35, 1 20, 1 45 ,260} , StatText + ItemDisable, 

*i20Nouvelle valeur:", 0, 0, 0L); 

ItemTemplate wFtxt2={4,{145,1 50,1 55,250}, StatText + ItemDisable, ", O. 0, 0L}; 

ItemTemptata wFtxt3 .{5 .{ 1 ,50, 1 ,350}, StatText + ItemDisable, 

"V36Changer le cadre de la fenStre", 0, 0, 0L}; 

ItemTemplate wFO-(10, {10,10,24,180}, Checkltem, "\0140: F_HILITED", 0, OxFFOO, OL); 

Item Templa te wF1 -{ 1 1 , {25, 1 ,39, 1 80}, Checkltem, "\0 1 3 1 : F_ZOOM ED". . OxFFOO , OL) ; 

ItemTemplate wF2-{12. {40,10,54,180}, Checkltem, "\0162: FJVLLOCATED", 0, OxFFOO, OL}; 

ItemTemplate wF3-{1 3, (55, 1 0,69. 1 80), Checkltem, "\01 53: F_CTRL_TIE", 0, 0, OL}; 

ItemTemplate wF4={1 4, (70, 1 0,84, 1 80), Checkltem, "\01 14: FJNFO", 0, 0, OL}; 

ItemTemptate wF5-{ 1 5 . ( 85. 1 0, 99 . 1 80) , Checkltem, "\0 1 05 : F_VIS ", . OxFFOO , L) ; 

ItemTemptate wF6-(16, (100,10,1 14,180), Checkltem, "\0156: F_QCOrVTENT", 0, 0, OL}; 

ItemTemplate wF7=( 17, (1 15,10,129,180}, Checkltem. "V01 17: F_MOVE", 0. 0, OL}; 

ItemTemptate wF8=( 1 8 , ( 1 0, 1 90,24 ,350) , CheckJtem, "\0 1 1 8 ; F_ZOOM ", , 0, OL) : 

ItemTemptata wF9-(1 9. (25,1 90,39,350}, Checkltem, "\01 19: F_FLEX", 0, 0, OL} ; 

ItemTemplate wF1O=(20, {40.190,54,350}, Checkltem. "\01 1A: F_GHOW, 0. 0, OL}; 

ItemTemplata wF1 1 ={21 , {55,1 90,69,350}, Checkltem, "\01 2B: F_BSCRL", 0, 0, OL}; 

ItemTemplate wF12={22, (70,190,84,350), Checkltem, "\012C: F_RSCRL", 0, 0. OL}; 

ItemTemplate wF13=(23, {85,190,99,350), Checkltem, "\012D: F_ALERT, 0, 0, OL}; 

ItemTemplate wF14={24, {100,190,1 14,350}, Checkltem, "\012E: F_CLOSE", 0, 0, OL}; 

ItemTemplata wF1 5={2S, {1 1 5,1 90,1 29,350}, Checkltem, "£11 2F: FJTTLE", 0, 0, OL) ; 



TaskRec 


tache: 


Pointer 


fenO, fen1, fen2; 


Handle 


dummyRgn; 


Rect 


scroll; 


int 


indie - TRUE ; 


int 


mylD; 
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DiahgTsmptate wFdlg-{ (25,140,190,500), TRUE.QL, 

{SwFOK. SwFannul, SwFtxtl , 4wFtxt2, &wFM3, 

SwFO, &wF1 , &wF2, &wF3, &wF4, &wF5, SwF6, 5wF7, &wF8, 

&wF9, SwF10. &wF11, &wF12, &wF13, SwFU. 5wF1S, OL) }: 



/"""*"* FICHIER EXTM.C: les instructions de programme «**«*»*/ 

♦include <tools.h> P definition des termas en gras */ 

♦include «entete.h> f definition des termes en italique */ 

♦include <exTM,data> P donnees modifiables u til i sees par ['application */ 

P ce que manipule Task Ma star 7 

P pointeurs sur fenelre */ 

T handle sur region 7 

P rectangle contenu de la fenetre 7 

P indicateur de fin de boucle 7 

P identifiant de lapplication */ 

/" les 4 masques possibles pour SetOrgnMask */ 

int masques[4] = (OxFFFF, OxFFFE, OxFFFC, 0xFFF8); 

int indM[2] - {0,0}; P indices masque courant 7 

f"" PROGRAMME PRINCIPAL *****/ 

main[) 

I 

int code: P code retourne par TaskMaster '/ 

char msg[20]; f reservation de 20 octets *' 

mylD . debut_appl(1}; P cette application ne tourne qu'en mode 640 7 

PlaceMenus( ); P installs la barre des menus systems V 

FlushEvents(£icerYEvent 0); P supprime tous les 6v6nements en attente 7 

dummyRgn • NewRgnf ); P alloue une nouvelle region 7 

lenO - NewWindow(SmaFenO): P ouvre la fendtre d'informalion. . . 7 
SetPort(fenQ) ; r . . .dans laque lie on va ecrire en pennanence 7 

GetPortR*ct(«scroll); P ...et dont on recupere le rectangle contenu 7 

tache. TaskMask - 0x00001 FFF: P initialisation du masque 7 

oo { p 4ai*A de la boucle d'evenements 7 

code - TaskMasterjEVoryEVsni. aiache): P on va chercher I'evenement suivant 7 
if(lcode) continue: P Tapplication n'a rien a faire, on boucle I 7 

ScrollRect(&scra!;, 0, -35, dummyRgn); P on fait defiler la fenetre d'informalion 7 

sprintf(msg, "code: %2d', code); 

MoveTo<3, 1 60) ; DnmrCStrf ng(msg) ; P on ecrit le code retou me 7 

sprintf(msg, "what: %2d", tache. what); 

HovbTo(3,170); Drw*CStr1ng(msg); /* et to type d'evenement qui I'a genere 7 

sprintf(msg, "0=$%al x" , tache , TaskData) ; 

Mosr*To(3 , 1 80) ; DrawCStrlnjtfmsg) ; P et les donnees associees 7 

switch (code) p code a trailer par I 'application 7 

{ 
case wlnManuBar ; r reponse a an article de menu 7 

indie _ F_x<3cMenu(tache. TaskData) ; 

break; 

case wlnGoAway : p une fenetre k termer 7 

ferme(tache. TaskData); 
break; 

case wtnSpacial : p reponse a un article special 7 

indie m ExecMenu(tache.rasftDala); 
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break: 



} 



while(indie). 

Dl spos»Rgn (dummyRgn) : 

quitter(mylD). 



f fin de la boucle d'6venemenls 7 

/* on evacue la region allonge 7 
r et on retoume au fi nder 7 



/"•** FONCTION PLACEMEN US: installs la barre des menus *****/ 
PlaceMenus( ) 



1nsertM«nu(N»wHenu(Menu4). 0); 
lnsertMenu(NewM«iu(Menu3), 0); 
lnsenMenu(NewMenu(Menu2), 0): 
lnsertMenu(Newl*enu(Menu1). 0); 
FixAppleNtefKJ(l); 
FixMenuBar( ); 
DrawMenuBar( ); 



T le menu 4 dans la barre V 
I* le menu 3 a sa gauche 7 
r le menu Z k sa gauche 7 
I* le menu 4 a sa gauche 7 
f accessoires de bureau dans le menu * 7 
r calcule la taille des menus 7 

r dessine la barre des menus */ 



/*"** FONCTION EXECMENU: repond au choix d'un article de menu / 

inl ExecMenu(arL menu) /* retoume FALSE si quitter est choisi 7 



art: 
menu; 



val, 



r article choisi 7 
r dans ce menu */ 



switch (art) 

{ 

case iAbout: 

Alert(&about,01); 

break: 






case iFenl : 

fern • NewWlndow(&maFen1); 
val - mascjues[indM[01]; 
SetOrgnMask(val,(en1 ); 
DisableMlt<m(iFen1): 
break; 

case iFenZ: 

ten2 - NewWlndow(&maFen2): 
val - masques [indM[1]]; 
SetOrg n Mask(v a I , f en2 ) ; 
D(sabl»Mltem(iFen2): 
break; 

case iFermer: 

(erme(Fran(Wln<lo»r( )); 
break; 

case iQuitter: 
return FALSE : 
break: 

caseiTM: 
gereTMO; 



r quel article choisi? 7 

T Apropos de... "7 

r on lance I'alerte puWicitaire 7 



r "Ouvrir fenl* 7 

r on ouvre la fenStre 1 7 

r on cherche la valeur du masque... 7 

f ...etonlefixe7 

r on rend I'article inactif 7 



f "Ouvrir fen2" 7 



r idem 7 



T une fenetre a termer. . . 7 
T ...I'aeluelle fenetre active V 



f I'ulilisateur en a assez. on sort 7 



/■ "Fixer TaskMask. . ." 7 
f on lance le dialogue */ 
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case i SOM : r "Fixer OrgnM ask ..." 7 

gereSOMQ; f on lance le dialogue 7 
break; 

case i Frame ; f "Fixer wFrame ..." */ 

ge re Frame( ) ; /* on f ance le dia tog ue 7 
break; 

case iTitre; r "Changer le titre. . ." 7 

gereTitreO; t on lance I e dialogue 7 
break; 

1 

if {art) HII1teMenu(fi4i.SE, menu); f on rend le tire du menu normal 7 

return TRUE ; /* et on continue 7 



p..... poNCTIOM FERME: fermeture d'une fenetre *""/ 

ferme(port) 

Pointer port; /* pointeur sur (a fenetre k fermer 7 

t 

if (port =. OL) return; r U ny a rien a fermer 7 

if (port — fenO) return; r on ne ferme pas la fenetre d 'information 7 

if (GetWKInd(port)) return; r on ne ferme pas les fenStres systeme V 

T c'est enfin una bonne fenetre, on retablit..,7 
EnableMltem(iFen1-1 + (int) GetWRef Con (port)}; /* ,,,1'activite de Tarticle Ouvrir 7 
if (port « fenf) fenl = OL; /* on ^limine le contenu... 7 

else if (port -= fen2) fenz - OL; P . . .du bon poinleur. . . */ 

CloseWlndow(port); /* ...et on ferme la fenetre 7 



/"*" PROCEDURE UPDFENO: dessine le contenu de la fenetre deformation *" 



void updFenO( ) f catte procedure ne fait rien 7 

r mais TaskMastor est contents '/ 
t ] T et ne nous envoi* pas d'evanement de mise a jour 7 

/*"" PROCEDURE PAINT: dessine le contenu des fenetres 1 et 2 ""'/ 

void Paint( ) 



int i, j: 

SetPenSlze{40,20). /' un crayon de belle taille 7 

-for (i-0, j-0; i<1S;++i) 
{ 

SetPenPat(pat[j]); I* on change le pattern du crayon */ 

Mov«To(40*i,0); 

Line1>(C,20*i); /* on trace une ligne oblique 7 

j . (| + 1 ) % 8: T le prochain pattern sera different 7 

) 



/*"" PROCEDURE INFO: dessine les zones d'information ' 
pascal void lnfo(bar,data,wnd) 
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gereTM( ) 
i 


1 

Painter 


dig; 


int 


it; 


int 


i: 


long 


val 


char 


msgpO] 



tong bar, data, wnd; 

{ I* on se place deux iignes au-dessus du bas de la zone */ 

MoveTo(10. ((flecr'}bar)->i»ftom-2); 

DrawCStrlng(intoStr); r et on ecrit un message V 

} 

/***" FONCTION GERETM: gestion du dialogue permettant de fixer TaskMask / 



T pointeur sur dialogue 7 
r I'item courant 7 



val - tache.TasWlfasA; f on recupere la valeur actuelle du masque '/ 

dig ■ GetNewModalDlalog(KTMdlg): r on ouvre la fenetre de dialogue */ 

spr i ntf (msg, "$%8lx ", val) : r la valeur est trad u ite en chains ty pe C ... 7 

clopstr(msg); f . .convertie en chaine type Pascal... 7 

SetfText(dlg, 4, msg); f -M affichee dans un texte statique 7 

for(i=0; i<16; ++i) f chaque bit est traduitau niveau... 7 

SetltemValue(getbits(val,i,1), dig, 10+i): f ...dune case a cocher 7 

do ( 

it - ModalDlalog(OL); C I'ufilisateur a choisi un item */ 

if (GetltemType(dlg, it) « Checkltem) f esl-ce une case a cochert 7 

SetHemValue(1-GwtltemValue(dlg, it), dig, it); f la case est changee... 7 

val "■ « ( 1 «{it- 1 0)) ; f .. .et la valeur est changee en conseq ue nee . . . 7 

sprintf(msg, "$%8lx", val): ctopstr(msg) ; 

SetlTexttdlg, 4, msg); f . . et affichee comme pretoedemment 7 

) 
while (it>2): r on boucle tant que I'utilisateur n'a pas clique dans un bouton 7 
if (it -= 1 } tache. TaskMask = val; f il a clique dans OK. on change le masque 7 

CloseDlafog(dlg); f on peut fenner la fenetre de dialogue 7 

/*"" FONCTION GERESOM: gestion du dialogue permettant cTappeler SetOrgnMask ""7 



T indice provisoire 7 
T pointeur sur dialogue 7 
I" pointeur sur fenetre 7 
r I'item courant 7 



port = FrontWlndow( }; f quelle est la fenetre active 7 

if (port ~ OL) return; f pour )a forme: on est sur qu'il y en a au moins une 7 

if (GetWKindfport)) return; f on ne veut pas d'une fendtre systeme 7 

if (port — fenl t k-0; /* fenetre 1 ... 7 

else if (port -- fen2) k-1 ; /* . . .ou fenetre 2 7 

else return; /* on ne veut pas non plus de la fenetre d'info 7 

val = masques[indM[k]]; f ancienne valeur du masque 7 

dig - GetNewModalDialog(&OMdlg);.~ on ouvre le dialogue 7 

sprintf(msg, •$%x", val): ctopstr(msg) ; 

SettText(dlg.4,msg) ; /"on affiche la valeur comme precede mment . . .7 



gereSOM() 
j 


i 
int 


tndprov; 


Pointer 


dig; 


Pointer 


port; 


int 


it; 


int 


i. k; 


tong 


val: 


char 


msgf.10]; 
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Setltem Value(1 , dig, 1 0+indM[k]) ; /* „ et on marque le bon bouton radio 7 

do { 

it - Modal Dial og(OL); r I'utilisateur a choisi un item 7 

if (GetltemType(dlg,it) =- Radioltern) t est-ce un bouton radio? 7 

{ 

Setltem Val ue(1, dig, it); f or force sa valeur a 1... V 

val = masques[indprov=it-1 0] ; /* , . .on change la valeur du masque. . . 7 

sprintf(msg, "$%x", val); ctopstr(msg); 
SetfTextfdlg, 4 , msg) ; r . . .et on I'affiche 7 

} 
} 
while (it>2); f on boucle tant qua I'utilisateur n'a pas clique dans un bouton 7 

if (it == 1) r si c'est le bouton OK... 7 

{ 

SetOrgnMask(val. port); r ...on fixe un nouveau masque... V 

indM[k] - indprov; /* ...et on le memorise sous forme tfindice 7 

) 

CloseDialog(dlg); f on feone le dialogue 7 



■ FONCTION GEREFRAME: gestion du dialogue 

pormettant de changer le contour des fenetres ' 



f pointeur sur dialogue 7 
r urie fenStre et un grafport 7 
r I'item courant 7 



F rectangle contanu de ia fenStre 7 

r quelle est la fen^tre active '/ 
r pour la forme: on est sur qu'il y en a au moins una 7 
f les caractensbques actuelles */ 
dig = GetNewModalCXalog(fiwFdlg); r on ouvre le dialogue 7 
if (port l= fenl && port I- fen2) r si la fenStre n'est ™ la fenfltre 1 re la fenStre 2. .. 7 
( r ...on dSsactive le bouton OK. . . */ 

HiliteControl{255, GetControl Item (dig. 1)); 
SetDef Button(2. dig) ; /* . . .et on fait d'Annuter te bouton par delaut 7 

) 
sprintf(msg, "$%8x", val) ; ctopstr(msg) : 

SetlTextfdlg, 4, msg) ; /* on affiche la valeur aotuelle de wFrams 7 

for(i-0;i<16;++i) f chaque bit est Iraduitau niveau... 7 

S»tltBrrV«luB(getbits((k>ng)val,i,1),dl8,10+i); r ...d'une case a cocher V 

do ( 

it - ModalDlalog(OL); f un item est choisi 7 

if (GetltemType(dtg, it) ~ C/jecWfem) I* est-ce une case a oooher? */ 

t 

SstltBrrA'alue(1 -Getltem Value (dig, it), dig, it); f on la change... 7 

val ** (1«(it-10)); f ...et on change la valeur pravisoire en consequence */ 
sprintf(mss, "$%8x", val); ctopstr(msg); 
S«trT«Kt(dlg, 4, msg) ; r on affiche oette valeur 7 

) 
I 
while (it>2); f on boucle tant que I'utilisateur n'a pas clique dans un bouton 7 

if (it — 1 } f si c'est le bouton OK. . . 7 

{ 



gem Frame ( ) 
r 


t 

Pointer 
Pointer 

int 


dig; 

port, old port; 

it; 


int 
int 
char 
Rixt 


i: 

val: 

msg[10]; 

r; 


port = FrontWindow( ); 
if (port == OL) return; 
val • GetWFrame(port); 
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SetWFrame(val, port): f ...on change les caracteristiques 7 

oldport = GetPort( ) ; Ton memorise le grafport actif */ 

SetPort(port) ; Ton fixe te grafport de la fenetre */ 

GetPortRectf&r) . /* on calcule le rectangle contenu 7 

f on force le Window Manager a redessiner le contour en agrandissant le contenu. 

SlzeWindow{r .right ■ r.left + 1 , r .bottom - r.top + 1 , port): t .. d'un pixel 

dans les 2 directions */ 
SetPort(okfport): f on retablit I'ancien grafport 7 

} 



CloseOialog(dlg); F on ferme le dialogue 7 



/••"* FONCTION GERETITRE: gestion du Dialogue permettant 

de changer le titre das fenetres """/ 

gereTilre( ) 

{ 

Pointer dig; C pointeur sur dialogue 7 

Pointer port; /* pointeur sur fanfitre */ 

int it; f I'item courant */ 

inl k; 

Pointer titre; f pointeur sur titre 7 

port = FronrWindow{ ); f quelle est la fenetre active 7 

if (port — OL) return; f pour la forme: on est sur qu'il y en a au moins une 7 

if (GetWKind(port)) return: f on ne veut pas des fenetres systeme. . . 7 

if (port == fen1)k=0; 

else if (port == fen2) k=1 ; 

else return; f ...nrde la fenetre dlnformation 7 

titre = GetWTitle(port) ; f on recupere un pointeur sur le titre actual 7 

dig - GetNewModalDialog(STfTdlg); f on ouvre le dialogue 7 

SetfText(dlg, 4, titre); /* on affiche le litre actuel... 7 

SelfText(dlg, 4, 0, 50) ; /* . . .et on le selectionne entjerement V 

it = ModalDlalog(OL); r pas besoin de boucle icl: seds les boutons ne sont pas muets '/ 

if(it=-1) ;" si leboutonOKaetechoisi... 7 

GetIText(dlg, 4, k ? titre2 : titrel): t ...on va remplacer le litre de la fenetre 7 

r meme pas besoin de SetWTitte, puisqu'on ecrit a I'adresse du precedent 7 
r des que le dialogue sera ferme, fa fenetre sera reactivee, V 
r et son contour redessine... avec le nouveau titrel 7 
CloseDlalog(dlg); .■" on ferme le dialogue 7 

} 

/***** FONCTION GET BITS: une vieille cortnaissance *""/ 

getbits(x, p, n) /*** prend n bits a parlir de fa position p "7 

unsigned long x; 
unsigned int p, n; 

[ relum<(x»(p+1-n))S-(-0«n)); ( 
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DEBUT ET FIN D'UNE 
APPLICATION 

GENERALITES 

• Nous lavons dit et rep£te\ il faut initialiser un outil avant d'utiiiser la moindre des 
routines qui le composent. Les routines ne venfiant pas si l'outil est actif au moment 
ou elles sent appetees, elles conduiront soit a des r£sultats aberrants, soit plus 
vraisemblablement au plantage du systeme, en cas de non-initialisation. 

La premiere chose que doit faire une application, e'est initialiser le Tool Locator. 
A parti r de la, deux possibility : soit elte impose une version aux outils rSsidant en 
memoire morte, auquel cas elie doit les charger explicitement par 1'une des procedures 
I.iuhITooIs et LoadOneTooi, soit elle accepte le chargement par deTaut, tel qu'il rdsulte 
de l'6tat des fichiers systeme qui contiennent les patches des outils en ROM. Nous 
avons choisi cette deuxieme solution. 

L'application initialise ensuite le Memory Manager, grace auquel i'application va 
recevoir un identifiant. Puis le Miscellaneous Tools, qui sera utilise' par 1'Event 
Manager. Elle va egalement se reserver un bloc de memoire vive entierement situ£ 
dans la banque 0, qui va constituer tout ou partie des pages zero dont les outils auront 
besoin pour fonctionner. Pour notre chargement standard, nous avons besoin de huit 
pages zero, nous reserverons done un bloc de 8 x 256 octets (soit $800). 

Ensuite nous initialisons QuickDraw et 1'Event Manager. QuickDraw reclame trois 
pages zero, ce qui explique que l'adresse de page zero donnee a 1'Event Manager soit 
z + 0x300. On remarquera egalement une facpn simple d'emre ces initialisations 
pour qu'elles soient valables aussi bien en mode 320 qu'en mode 640, en utilisant les 
decalages de bits. Toute application rficlamera au minimum ces initialisations. 

La procedure InitCursor est ensuite appelee, pour faire apparaitre le curseur 
systeme. Pourquoi ici ? Parce que juste apres, nous allons charger les outils r£sidant 
sur disque, et que s*il y a une erreur au chargement, une pseudo-alerte sera arfkhie, 
qui reclamera 1'utilisation du curseur pour un die souris dans un bouton. Puisque nous 
n'imposons pas de numero de version a QuickDraw et a 1'Event Manager, qui sont des 
outils residant en memoire morte, nous sommes a peu pres sur qu'ils seront initialises 
(il faudrait un manque de memoire complet pour que ee ne soit pas le cas, et 
New Handle aurait retounk zero-long : rien n'empeche de tester ce rGsultat !), et nous 
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pouvons done utiliser la fonction TLMoiuitVolume. Nous ne nous fatiguerons pas 
trop : s'il y a une erreur de chargement, nous affichons I'alerte, et quel que soil le 
bouton choisi, nous annulons tout ce que nous avons d£ja fait et nous retournons vers 
le programme qui a lance notre application. 

Nous avons pris ['option de charger les sept outils principaux, laissant de c6t£ le 
Font Manager, Cela n'est £videmment pas une regie immuable, et cette regie doit etre 
adaptee en fonction de I'utilisation qui en est faite au sein de ['application. Certaines 
regies sont I suivre absolument : le Window Manager risque d'avoir besoin du Control 
Manager, si les fenetres possedent des controles dans leur region contour, le Control 
Manager a forc£ment besoin du Window Manager, Line Edit a besoin du Window 
Manager et peut avoir besoin du Scrap Manager pour gerer son presse-papiers prive, 
le Dialog Manager a forcement besoin du Control Manager et de Line Edit, le 
Standard File Operations a besoin du Dialog Manager, le Desk Manager a besoin du 
Window Manager, de Line Edit, du Scrap Manager, du Menu Manager, etc. On 
constate tres vite qu'une application a besoin des sept outils principaux pour pouvoir 
fonctionner. (Le Font Manager est un peu a part : il ne reclame que QuickDraw, et 
n'est r6clam£ par personne, tant que les autres outils se contentent du jeu de 
caracteres systeme). 

Maintenant que nos outils RAM sont charges, nous allons pouvoir les initialiser. 
L'ordre des initialisations n'est pas primordial, sauf quand deux outils se partagent la 
meme page zero. Ainsi, le Window Manager doit obligatoirement etre initialise apres 
l' Event Manager, et le Dialog Manager apr£s le Control Manager. De meme, le Menu 
Manager devra etre initialise apres le Window Manager, de telle sorte que le haut de 
l'ecran (la oil viendra s'installer la barre systeme) puisse etre declare zone interdite par 
la fonction Desktop. 

Chaque fois qu'un outil est initialise, nous testons !e code erreur, et nous affichons 
un message donnant la valeur de ce code s'il n'est pas nul. Nous attendons un clic 
souris pour poursuivre, mais il y a des chances pour que ['application se poursuive 
mal ! On pourrait a ce moment-la proposer ou imposer a 1'utilisateur un retour au 
programme appelant... nous ne l'avons pas fait. 

Ouand tous ces outils sont initialises, on peut consid£rer que la phase « d£but 
d'application » est terminee. Ceux qui le veulent pourraient y inclure l'appel a la 
fonction HushKvent, plutot que de l'appeler a partir d'un autre fichier programme de 
rapplication... ou de ne pas l'appeler du tout. 

• Au moment de quitter ['application, il faudra faire un peu de menage et laisser 
place nette a la suivante (generalemen! le programme superviseur, a moins que 
1'application ne permette le transfert direct a une autre application... mais cela, il faut 
le gerer !), Nous allons proedder en sens inverse de nos initialisations, en fermant les 
uns apres les autres les outils que nous avons initialises. 

L'appel a MMShutDuwn est primordial : e'est lui qui va rendre purgeables tous les 
blocs de memoire reserves explicitement ou implicitement par ['application, puisqu'ils 
sont marques de I'identifiant de I 'application. C'est grace a cette procedure qu'on peut 
se permettre par exemple, et nous ne nous en sommes pas prives, de ne pas fermer les 
fendtres gerees par ['application : le Memory Manager s'en chargera tout seul ! (C'est 
le Desk Manager qui se charge de dire au Memory Manager quelles sont les fenStres 
systeme qui pourraient ne pas avoir ete fermees.) 

Derniere etape, on appelle la commande QUIT de ProDOS. En attendant des glue 
routines C pour appeler directement ProDOS, ou mieux, un File Manager du type de 
celui du Macintosh, c'est par un appel direct a quelques instructions assembleur que 
nous conclurons. Dans les environnements Megamax, on les rem pi ace ra par la simple 
instruction exit(O) (exit est une fonction de la bibliotheque standard). 



FICHIER PROGRAMME 

II s'appelle DebFin.c et est valable quel que soit le mode super hi-res choisi. Pour 
etre utilise, il suffit de le compiler tout seul une fois pour toutes, ce qui cree un fichier 
objet DebFin.o. Chaque fois qu'une application sera cre£e : 
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- die d£butera par I'appel a la fonction debut_appl, en passant le mode de 
resolution en argument (suivant le code : pour le mode 320 x 200, 1 pour le mode 
640 x 200), Cette fonction retourne 1'identifiant de ['application ; 

- elle finira par 1'appel a la fonction quitter, en passant l'identifiant de ['application 
en argument (qu'elle aura done conserve quelque part en m^moire, meme si elle n'en 
a pas besoirt) ; 

- au moment de l'£dition des liens (link), elle inclura le fichier DebFin.o a la liste 
des fichiers a relier, de telle sorte que les fonctions prealablement cities soient incluses 
dans le code executable g€nit€. 

/****""*• Fichier DEBFIN.C **" 7 



#include <tools.h> I* definition des termes en gras 7 

int _enno; I* variable qui recoil les codes d'erreur 7 

char "pgzero; f handle sur pages z6ro systems 7 

long quitparms[ ] - {0, 0) ; /* parametres pour la commands ProDOS QUrT 7 

int tools[ ] - {7, r sept outils charges en permanence 7 

14, 0x103, r Window Manager version 1 .03 ou posterieure 7 

1 5, 0x1 03, r Menu Manager version 1 .03 ou posterieure 7 

16, 0x103, r Control Manager version 1 .03 ou posterieure 7 

20, 0x100, r Line Edit version 1 .00 ou posterieure V 

21 , 0x101 , r Dialog Manager version 1 ,01 ou posterieure 7 

22, 0x101 , r Scrap Manager version 1 .01 ou posterieure 7 

23, 0x101 }; f Standard File version 1 .01 ou posterieure 7 

char Iigne1| ]-"\42Certatns outils nesont pas a jour"; 
char Iigne2[ ] » "W1 Bemarrer avec un autre system©..."; 
char btn1[] = -£OK"; 
char btn2[ j . "\7Annuter"; 



/"'"■ fonclion debut_appl "***/ 

/* cette fonction assure le chargeraent des principaux outils 
en memo ire vive ainsi que leur initialisation 7 



int debut_appl(mode) 

mode; 



T retourne lldentifiant de ('application 7 



f recoit si le mode 320 est utilise 
1 si le mode 640 est utilise 7 



mylD; 



I" identiflant de ['application 7 
r pointeur sur les pages z^ro */ 



TLStartUp( ); r initialisation du Tool Locator 7 

mylD = MMStartUp( ); /* initialisation du Memory Manager V 

MTSIBrtUp( ) ; r initialisation de Miscellaneous Tools 7 

pgzero ■ NewHandle(0x800L r mylD, OxCOOl , 0L); f reservation d'un bloc 

de 8 pages zero 7 
i - "pgzero; r on dereference le handle pour obtenir un pointeur 7 

QDStartUp((int) z, mode«7, 160, mylD); r initialisation de QuickDraw '/ 

r initialisation du Memory Manager 7 
EM Start Up(( int) (z + 0x300), 20, 0, 10*(32«mode), 0, 200, mylD); 
lnitCursor( ); r le curseur est rendu visible en forme de fteche 7 



Loa«fT0OlS( tools); 
if (_errno) 



r chargement des outils a partir du disque systeme ' 
T si autre chose que zero, done si erreur. .. 7 
r . . on affiche une pseudo-alerte. . . 7 
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TLMountVolum»(20+160"mode, 60, lignel, Iigne2, btnl, btn2); 
retourfinder(mylD) : /* . . .et on retourne au finder */ 

) 

WlndStartUp(mylD); f initialisation du Window Manager 7 

if{_ermo) erreur(10,4E, "WindStartUp"); r si erreur, on I'atfiche a I'ecran 7 

Refresh (0L): /* on se place en environ nement desktop 7 

CtlStartUp(mylD, (int) (z + 0x400)); t initialisation du Control Manager 7 

if(_ermo) erreur(10.60. "CtriStartUp") ; 

LEStBrtUp(mylD, (int) (z + 0x500)); f initialisation de Line Edit 7 

if(_ermo)erteur[10,75, "LEStartUp"); 

DialogSWttUp(mylD); 

if(_errno) erreur(10.90, "DialogStartUp"); 

MenuStartUp(mylD, (int) <z + 0x600)); 

if(_errno) erreur(10,105, "MenuStartUp"); 

Scrap StartUp{ ); 

if(_errno) erreur(10 r 120, "ScrapStartUp"); 



f initialisation du Dialog Manager 7 
r initialisation du Menu Manager 7 
f initialisation du Scrap Manager 7 



r initialisation du Standard File Operations 7 



SFStartUp(mylD,(int) (z + 0x700}); 

i({_errno) erreur(10,135, "SFStartUp") 

DeskStartUp( ); r initialisation du Desk Manage 

il(_errno) erreur(10,1S0, "DeskStartUp"); 



return mylD; 



f la fonction retourne I'identifiant de I'application 7 



/**"* fonction quitter "*•*/ 

cette fonction assure la deallocation des principaux outils 
en memoire vive et le retour au finder */ 



quitter(mylD) 
int mylD; 



r identifiant de I'application 7 



GrafOff ( ); 
DeskShutDown( ); 
SFShutDown( ); 
ScrapShutDown( ); 
MenuShutDown( ); 
DialogShutDowni ); 
LESfvutDown( ); 
CtlShutDown( ); 
W1ndShutDown(); 
retourfinder(mylD); 



f on quitte le mode super haute resolution 7 

l" on ferme le Desk Manager */ 

/* on ferme le Standard File Operations 7 

I" on ferme le Scrap Manager V 

/* on ferme le Menu Manager 7 

I" on ferme le Dialog Manager 7 

I" on ferme Line Edit 7 

f on ferme ie Control Manager "I 

I" on ferme le Window Manager •/ 

J" retour au finder V 



/"*** FONCTION RETOURFINDER / 

r cette fonction assure le retour au programme general ayant permis 

lo lancement de I'application, que ce soit MouseDesk, 

le finder d'Apple, le program launcher ou toute autre chose... 7 

retourfinder(mylD) 



EMShutDown( ); 
QDShutDown( ): 
DlsposeHandte(pgzero) ; 



r on ferme I'Event Manager 7 

r on ferme QuickDraw 7 

T on n'a plus besoin de nos pages zero ' 
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MTShutDown( ); T on ferme le M iscellaneous Tools 7 

MMShutDown(mylD): /* on ferme le Memory Manager 7 

TLShutDown( ); f on ferme le Tool Locator 7 

f pour quitter proprement. on appelle en assembleur la commande ProDOS QUIT 7 
asm 

{ 

jsl 0xE100A8 f ProDOS dispatcher 7 

dew 0x29 r commande QUIT 7 

del quitparms /* parameter list */ 

dew OxFOOO TBRK 7 



/*"** Fonction erreur *****/ 

I" assure I'affichage d'un message d' erreur quand un out' I ne peut 6tre initialise 7 

erreur(x,y,msg) 

int x, y: f tocalisation du message 7 

char msg[ ]; f morcaau de message 7 

[ 

char mess [SO]; f message complet 7 

sprintf(mess, "Erreur %x dans %s", _ermo, msg); f preparation du message 7 

MoveTo(x.y); DrawCStrlng(mess); f ecriture sur le desktop 7 

while (!Button(0)): f attente d'un die souris 7 
} 

EXEMPLE COMPLET : LA VERSION DES OUTILS 

Nous avons parle plusieurs fois de la version des outils utilises. Dans cet exemple, 
nous allons enfin les afficher ! Rien de bien complique' 1^-dedans, ['application se 
passe de commentaire. On reraarquera que le Font Manager, qui n'est pas dans la liste 
des outils manipules par debut.appl, est charge et initialise tout seul comme un grand. 
Ce qui nous permet en plus de 1'utiiiser, et de faire notre affichage dans la police 
Venice 14. On reraarquera egalement comment Task Master est utilisee pour gerer 
l'option Quitter du menu deroulant, etant donn£ que e'est le seul article a'ctif. 



Version des outils 



System Loader vers .101 Window Manager vers . 1 03 

Toot Locator vers . 1 02 Menu Manager vers . 1 03 

Memory Manager vers. 102 Control Manager vers. 103 

Miscellaneous vers. 102 Line "Edit vers . 100 

Desk Manager vers. 102 Dialog Manager vers. 101 

QuickDraw vers . 1 02 Standard" file vers .101 

Event Manager vers. 100 Scrap Manager vers. 101 

font Manager vers . 100 



Figure XII. 1. I.es outils que nous avoirs utilises tout uu long de eel murage. 
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Les numeros de version affiches dans ] 'illustration XII. 1 sont ceux des outils qui 
etaient a notre disposition quand nous avons termine la redaction de cet ouvrage (c'est 
par erreur que le Font Manager affiche une version 1.00, erreur qui lui est propre !). 
Si vous utilisez des outils plus recents, il est possible que certaines modifications aient 
etc apportees, non dans la syntaxe des appels, mais plutot dans le fonctionnement : 
ameliorations, corrections de bogues, voire nouvelles routines. En aucun cas vous ne 
devriei utiliser des versions d'outils anterieures a celles listees dans cet ecran, sinon 
vous ne pourriez pas charger les outils a partir du disque, etant donn^ les numeros de 
version imposes par notre fonction debuUppl. 
ainclude <tools.h> F definition des caracteres en gras "/ 

^include <jentete.h> /* definition des caracteres en italique V 

char Menu2[ ] - "> Version des ouffls\\N2"; 

char Menu21[ ) - "- par Jean-Pierre CURCICXN271D"; 

char Henu22[ J - "- Quitter\\N272*Qq*; 

char Menu29[] - '. *; 

extern _ermo ; r la variable qui recoil les erreurs */ 

rraini } 

{ 

ml mylD; r identifiant de ('application '/ 

TaskRee tache; t ee que manipute TaskMasler 7 

char msg[50]; 

lache. TaskMask - 0x00001 FFF; 
mylD-debut_appl(1); rmode640 7 

LoadOnaTool(27, 0x100); I" chargement et initialisation du Font Manager 7 

\fi_ermd) erreur(10,30, "Load27"); 

FMStartUpiOL, my ID, (int) *rJawHandl*(0x100L, mylD, Ox CO0 1, 0L)); 

if(_armo) erreur(10,165, "FMStartUp"); 

Desk top(5, 0x400000 FF) . ;" le desktop sera lout blanc 7 

SetTirleStart(1 20) ; /* 1 20 pixels laisses a gauche dans la bar re de menus 7 

lnsertMenu(NewMenu(Menu2), 0): r I'unkju© menu de la barre 7 

FixMenuBar( ); f dbnerann dJt la bane 7 

DrawMenuBail ). r dessin de la barre 7 

lnstallFont( 14*256+0. 5, t): r on va ecrire en Venice 14 7 

sprintf(msg, "System Loader vers. %x", LoaderVersion{ )); 

MoveTo{10,40);DrawCStrlng(msg); 

sprintf(msg. Tool Locator vers. %x", TL Version ( )); 

MoveTo(10,60); DrawCStrlng(msg); I 

sprintf(msg, "Memory Manager vers. %x", MMVersion( )); 

MoveTo(10,80); DrawCStrlng(msg); 

sprintf(msg, "Miscellaneous vers. %x", MTVerslon( )); j 

MoveTo(10,100); DrawCString(msg); 

sprinrf(msg, "Desk Manager vers. %x", DeskVersionf )); 

MoveTo(10,120); DrawCStrlng(msg}; 

sprintf(msg, "QuickDraw vers, %x", QDVersion( )); ' 

MoveTo(10,140); DrawCString(msg); 

sprintf{msg, "Event Manager vers. %x", EMVersion{ )); 

MoveTo(10,160); DrawCStrlng(msg); ' 

sprintf(msg, "Window Manager vers. %x", Wind Vers Ion ( )); 

MoveTo{250,40); DrawCString(msg); , 

sprintffmsg, "Menu Manager vers. %x", MenuVersion( )); C 

MoveTo(250,60); DrawCStrlng(msg); 

sprintf(msg, "Control Manager vers. %x". CtrlVersion( )); 



) 
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MoveTo(2S0,80); DrawCString(msg); 

sprintf(msg, "Line Edit vers. %x", LEVBralon( )); 

Mtov«To(250,100); DrawCStrtng(msg); 

sprintf(msg. "Dialog Manager vers. %x", DlaloflVorilonf )); 

MoveTo(250 r 120); DfBwCString(msg); 

sprintf(msg, "Standard File vers. %x", SFVw*lon{ )); 

MoveTo{2SCl,140): DrawCStflng(msg); 

sprintf(msg, "Scrap Manager vers. %x", ScrapVertlon( )): 

MoveTo (250,160); DrawCString(msg): 

sprintf(msg, "Font Manager vers. %x", FMVerslon{ )); 

MoveTo (2 50 , 1 SO) ; DrawCStrlng{msg) ; 

FlushEventetEve/yEverrr, 0); T on supprime les evenements en attente */ 

while (TaskMaater( Even/Event, Stache) I- wtnMenuBai) ; r quelle belle boucle! 7 

FMShutDown(); F on ferme le Font Manager 7 

UnloadOneTool(27): Ton evacue la Font Manager de la m6moire 7 

quitter(my)D); I* on quite I'application 7 



CHAPITRE XIII 



LISTE DES ROUTINES 

RAPPEL DES OUTILS DISPONI BLES 

Void la liste des outiis disponibles ou annonc^s a l'heure ou nous emvons ces 
lignes. Chaque outi! porte un nurnero (decimal) et une abr£viation que nous 
utiliserons dans la lisle des routines (si une routine au moins appartient a 1'outil). Pour 
connaitre le num^ro exact d'identification d'une routine utilised par le dispatcher, on 
rapprochera ce num£ro et le code de la routine, et on utilisera la fonction speciale 
inline pour appeler la routine. 



Outiis en ROM 




Outiis en RAM 




1. Tool Locator 


TL 


14. Window Manager 


Wind 


2. Memory Manager 


Mem 


15. Menu Manager 


Menu 


3. Miscellaneous Tools 


Misc 


16. Control Manager 


Ctl 


4, QuickDraw II 


QD 


17. System Loader 




5. Desk Manager 


Desk 


18. QuickDraw auxiliary 




6. Event Manager 


Evnt 


19. Printer Driver 




7. Scheduler 




20. Line Edit 


LE 


8. Sound Tools 




21. Dialog Manager 


Dig 


9. Apple Desktop Bus 




22. Scrap Manager 


Scrp 


10. SANE 




23. Standard File 


SF 


11. Integer Math 




24. Disk Utilities 




12, Text Tools 




25. Note Synthesizer 




13, Utilisation interne 




26. Note Sequencer 








27. Font Manager 


Font 



LISTE DES ROUTINES 

Void la liste des 479 routines dont nous avons parle' dans cet ouvrage. Elle est loin 
d'etre exhaustive, mais nombreuses sont les applications qui n'auront pas besoin 
d' autre chose. Pour chaque routine, on don n era : le type de don nee s qu'elle retourne 
(type void si c'est une procedure), son nom, le type de chaeun de ses arguments, 
l'abreViation de I'outil a laquelle elle appartient, le numero d'identification a 
Tinteneur de Toutil et Ja page ou elle est expliqu^e ou evoquee. Les routines sont 
classes par ordre alphab^tique. 
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Les conventions suivantes sont employees ; 

- int designe un entier sur 16 bits (c'est-a-dire un mot machine, qui peut egalement 
designer une valeur booleenne) ; 

- long designe un entier sur 32 bits (un entier long, soit deux mots machine) ; 

- Ptr designe un pointeur cm une adresse (code sur 32 bits, l'octet le plus 
significatif Slant a z£ro) ; 

- Hdl designe un handle (pointeur sur pointeur, done m£mes specifications) ; 

- void designe une routine qui ne retourne aucun r^sultat (ce type est peu utilise en 
C, oil toute f emotion est cense 1 e retourner un r£sultat... mais rappelons que les routines 
Toolbox sont de type Pascal). 



void 


AddPt(Ptr,Ptr) 


int 


Alert<Ptr,Ptr) 


void 


BeginUpdale(Ptr) 


void 


Block M«ve( Ptr , Ptr .long) 


in) 


Button(int) 


void 


CalcMenuSize(int ant , int ) 


int 


CautionAlert(Ftr,Ptr) 


void 


CharBounds(int,Ptr) 


int 


CharWidth(int) 


void 


CheckMItem(int,int) 


void 


ChpRect(Ftr) 


void 


CloseAllNDAsQ 


void 


CloseDialog(Ptr) 


void 


CloseNDA(int) 


void 


CloseNDAbyWinPtr(Ptr) 


void 


Close Picture! ") 


void 


ClosePolyO 


void 


ClosePort{Ptr) 


void 


CloseRgn(Hdl) 


void 


CloseWindow(Ptr) 


void 


CompactMem() 


void 


CopyRgn(Hdl,Hdl) 


int 


CountM Items (int i 


void 


CStringBounds(Ptr,Ptr) 


int 


CStringWidth(Ptr) 


void 


CtlShutDownO 


void 


CtlStartUp(int,int) 


int 


CtlVersion() 


void 


Deleteltem(int) 


void 


DeleteMenu(int) 


void 


DeskShutDownQ 


void 


DeskSUrtUpO 


long 


Desktop(int,long) 


int 


DeskVersion() 


int 


DialogSelect(Ptr,Ptr,Ptr) 


void 


DialopShutDovmO 


void 


DialogStartUp(mt) 


int 


DialogVersionQ 


void 


DiffRgn(Hdl,Hdl,Hdl) 


void 


DisableDItem(Ptr ( int) 


void 


DisahleMItem(int) 


void 


DisposeAH(int) 


void 


Pi spose C out ro 1 ( II d 1 ) 


void 


DisposeHandle(Hdl) 


void 


DisposeMenu (Hdl) 


void 


DisposeRgn(Hdl) 


void 


DlgCopy(Ptr) 


void 


DlgCut(Ptr) 


void 


DlgDelete(Ptr) 



QD 


128 


74 


Dig 


23 


258 


Wind 


30 


147 


Mem 


43 


41 


Evnt 


13 


109 


Menu 


28 


179 


Dig 


26 


259 


QD 


172 


85 


QD 


168 


85 


Menu 


50 


176 


QD 


38 


65 


Desk 


29 


279 


Dig 


12 


256 


Desk 


22 


279 


Desk 


28 


279 


QD 


185 


94 


QD 


194 


77 


QD 


26 


63 


QD 


110 


79 


Wind 


11 


134 


Mem 


31 


39 


QD 


105 


80 


Menu 


20 


181 


QD 


174 


85 


QD 


170 


85 


Ctl 


3 


320 


Ctl 


2 


203 


Ctl 


4 


322 


Menu 


16 


179 


Menu 


14 


179 


Desk 


3 


320 


Desk 


2 


277 


Wind 


12 


150 


Desk 


4 


322 


Dig 


17 


260 


Dig 


3 


320 


Dig 


2 


250 


Dip 


4 


322 


QD 


115 


82 


Dig 


57 


261 


Menu 


49 


172 


Mem 


17 


38 


Ctl 


10 


205 


Mem 


16 


38 


Menu 


46 


179 


QD 


104 


79 


Dig 


19 


260 


Dig 


18 


260 


Dig 


21 


260 
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void 


DlgPaste(Ptr) 


Dig 


20 


260 


void 


DragConirol(int,int,Ptr,Ptr,int,Hd]) 


Ctl 


23 


210 


long 


DragRect(long,Ptr,int,int,Ptr,Ptr.Ptr,int) 


Ctl 


29 


211 


void 


DragWindow(int ,int ,int ,int ,Pti ,Ptr) 


Wind 


26 


142 


void 


DrawChar(int) 


OD 


164 


93 


void 


DrawControls(Ptr) 


Ctl 


16 


209 


void 


DrawCString(Fti) 


QD 


166 


93 


void 


DrawMenuBarQ 


Menu 


42 


173 


void 


DrawPkture(Hdi,Ptr) 


QD 


186 


97 


void 


DrawString(Ptr) 


QD 


165 


93 


void 


DrawText(Ptr,int) 


QD 


167 


93 


int 


EmptyRect(Ptr) 


QD 


82 


76 


int 


EmptyRgn(HdJ) 


QD 


120 


82 


void 


EMShutDownQ 


Evnt 


3 


321 


void 


EMStartUp(int,int,int,int,int,int,int) 


Evnt 


2 


108 


int 


EMVerskraO 


Evnt 


4 


322 


void 


EnableDItem(Ptr,int) 


Dig 


58 


261 


void 


EnableMItem(int) 


Menu 


48 


176 


void 


End JnfoDra vying! ) 


Wind 


81 


149 


void 


EndUpdat«(Pti) 


Wind 


31 


147 


int 


Equal Pt(Ptr,Ptr) 


QD 


131 


74 


int 


EqualRect(Ptr,Ptr) 


QD 


81 


77 


int 


EquaiRgn(Hdl,Hdl) 


QD 


119 


83 


void 


EraseArc ( Ptr ,int ,in t ) 


QD 


100 


92 


void 


EraseOval(Ptr) 


QD 


90 


92 


void 


ErasePoly(Hdl) 


QD 


190 


93 


void 


EraseRect(Ptr) 


QD 


85 


88 


void 


EraseRgn(Hdl) 


QD 


123 


V,l 


void 


EraseRRect ( Ptr ,in t , in t) 


QD 


95 


92 


int 


EventAvail(int,Ptr) 


Evnt 


11 


108 


void 


FiUArc{Ptr,int,int,Ptr) 


QD 


102 


92 


void 


Fil10val(Ptr,Ptr) 


QD 


92 


92 


void 


FillPoly(Hdl.Ptr) 


QD 


192 


93 


void 


FulRect(Ptr,Ptr) 


QD 


87 


89 


void 


FillRgn(Hdl,Ptr) 


QD 


125 


92 


void 


FMRRect(Ptr,int ,int ,Ptr) 


QD 


97 


90 


int 


FindControl(Ptr,int,int,Ptr) 


Ctl 


19 


206 


int 


FindDItem(Ptr,long) 


Dig 


36 


265 


Hdl 


FindHandle(Ftr) 


Mem 


26 


36 


int 


Find Window( Ptr ,i nt , int) 


Wind 


23 


141 


void 


Fix A ppleMenu(i nt ) 


Desk 


30 


277 


int 


1 1xMenuBar( ) 


Menu 


19 


173 


void 


FlashMenuBarQ 


Menu 


12 


181 


int 


FlushEvents(int,int) 


Evnt 


21 


108 


void 


FMShutDownQ 


Font 


3 


322 


void 


FMStartUpCPtr,int,int) 


Font 


2 


280 


int 


FMVersion() 


Font 


4 


322 


void 


FrameArc(Ptr,int,int) 


QD 


98 


92 


void 


FrameOval(Ptr) 


QD 


88 


92 


void 


FramePoly(Hdl) 


QD 


188 


93 


void 


FrameRect(Ptr) 


QD 


83 


88 


void 


FrameRgn(Hdl) 


QD 


121 


92 


void 


FrameRRect(Ptr,int,int) 


QD 


93 


9(1 


long 


FreeMem{) 


Mem 


27 


39 


Ptr 


Front Window() 


Wind 


21 


141 


Lai 


G«tAlertStage() 


Dig 


52 


259 


int 


GetBackColorQ 


QD 


163 


72 


void 


GttBaekPat(Ptr) 


QD 


53 


67 


long 


GetBarColors() 


Menu 


24 


181 


long 


GetCaretTime() 


Evnt 


18 


112 


Ptr 


GetCDraw(Ptr) 


Wind 


72 


139 


long 


GetCharExtra() 


QD 


213 


87 
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void 

Hdl 

int 

void 

Hdl 

Hdl 

long 

Ptr 

long 

long 

Ptr 

tot 

Ptr 

long 
long 
int 
Ptr 



long 

int 

void 

Ptr 

long 

Ptr 

long 

Ptr 

void 

int 



Lilt 

int 
void 

int 
long 
Kill 
Ptr 

Ptr 
Hdl 

void 

\ oid 

Ptr 

int 

int 

Ptr 

int 

long 

void 

void 

int 

void 

void 

void 

int 

Ptr 

void 

void 

void 

int 

void 



GetClip(Hdl) 

GetClipHandle() 

GetColorEntry(int , int) 

GetColorTable(int,Ptr) 

GetContRgn(Ptr) 

GetControlItem(Ptr,int) 

GetCOrigin(Ptr) 

GetCHAction(Hdl) 

GetCtlParams(Hdl) 

GetCtlRefCort(Hdl) 

GetCtlTitlefHdl) 

GetCtlValue(Hdl) 

GetCursorAdr() 

GetDalaSize(Ptr) 

GelDblTime() 

GetDefButton(Ptr) 

GetDerProc(Ptr) 

GetFirstHem(Ptr) 

GetFont() 

GetFontFlagsQ 

GetFontID() 

GetForeColor() 

GetFrameColor(Ptr.Ptr) 

G*tFullRect(Ptr) 

GetHandleSize(Hdl) 

GetlnfoDraw(Ptr) 

GellnfoRefCon(Ptr) 

Getrtem(int) 

GetItemBox(Ftr,int,Ptr) 

GetltemMark(int) 

GetltemStyle(int) 

GetltemType(Ptr.int) 

GetltemVarue(PtrJnt) 

GetIText(Ptr,int,Ptr) 

GetMasterSCB() 

GetMaxGrow(Ptr) 

GetMenuBar() 

GetMenuMgrPortQ 

GetMenuTitle(int) 

GetMHandle(int) 

GctMouse(Ptr) 

GelNewDIIem(Ptr,Ptr) 

GetNe wModalDialog ( Pt r) 

GetNextEvent(int,Ptr) 

GetNextItem(Ptr,int) 

GetNext Window ( Ptr) 

GetNumNDAs() 

GetPage(Ptr) 

GetPen(Ptr) 

GetPenMask(Ptr) 

GetPenModeQ 

GetPenPat(Ptr) 

GetPenSize(Ptr) 

GetPenState(Ptr) 

GetPixel(int,int) 

GetPort() 

GetPortLoc(Ptr) 

GetPortRect(Ptr) 
GctRectInfo(Ptr,Ptr) 
GttSCB(int) 
GetScrap(Hdl.int) 



QD 37 

QD 199 

QD 17 

QD 15 

Wind 47 

Dig 30 

Wind 62 
Clt 



Ctl 

Ct! 
Ctl 

Ctl 
Qd 



Dig 
Dig 
Evnt 
Die 



on 
QD 
QD 
QD 
QD 
QD 
QD 
QD 
QD 



33 
28 
35 
13 
26 
143 



Wind 64 

Evnt 17 

Dig 55 

Wind 49 

Dig 42 



149 
153 
209 

161 

16 



QD 
QD 
QD 
QD 

Wind 
Wind 55 
Mem 24 
Wind 74 
Wind 53 
Menu 37 
Dig 40 
Menu 52 
Menu 54 
Dig 38 
Dig 
lilg 
QD 
Wind 66 
Menu JO 
Menu 27 
Menu 34 
Menu 22 
Evnt 12 



46 

31 

23 



Wind 42 

Desk 27 

Wind 70 
QD 



41 
51 

47 
49 
45 
43 
136 
28 
ill 
32 



Wind 79 
QD 19 
Scrp 13 



65 

65 
40 

4(1 

140 

261 
136 
210 
213 

21(1 
209 
211 
gg 

136 

112 

264 

139 

265 

71 

7] 

72 

72 

136 

136 

39 

139 

139 

178 

260 

176 

177 

260 

261 

263 
48 

137 

183 

181 

176 

179 

109 

253 

254 

108 

265 

151 

278 

139 
68 
70 
68 
69 

68 

70 

98 

62 

64 

65 
150 

48 
281 
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Hdl 
Ptr 
long 
int 

long 

long 

int 

Hdl 

Hdl 

Hdl 



Hit 

int 

[Id! 

long 

Hdl 

void 

int 

int 

Ptr 

long 

Ptr 

void 

long 

void 

void 

void 

void 

void 

void 

vuii! 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

void 

int 

void 

void 

void 



GetScrapCountQ 
GetScrapHandle(int) 

GetScrapPathQ 

GetScrapSize(int) 

GetScrapStateQ 

GetScroll(Ptr) 

GetSpaceEjttra ( ) 

GetStandardSCB() 

GetStructRgn(Ptr) 

GetSysBarQ 

GetSysFontQ 

GetSysWFIag(Ptr) 

GetTextFaceQ 

G*tTextMode() 

GetTextSizef) 

GetTiUeStart() 

GetTiHeWidth(int) 

GetUpdaleRgn(Ptr) 

GetUserFieldQ 

GetVisHandleQ 

GetVisRgn(Hdl) 

GetWFrame(Ptr) 

GetWKind(Ptr) 

GetWMgrPortQ 

GetWRefCon(Ptr) 

GetWTitle(Ptr) 

GIobalToLocal(Ptr) 

GrowWindow(int.int,int,int,Ptr) 

HandToHand(Hdl , Hdl Jong) 

HandToPtr(HdI , Ptr .long) 

HideControl(Hdl) 

HideCursor() 

HideDItem(Ptr,int) 

HidePenQ 

HideWindow(Ptr) 

HiliteControl(int,Hdl) 

HiliteMenu(int,int) 

HLock(Hdl) 

HLockAII(int) 

HUnlockfHdl) 

HUnlockAll(mt) 

InitColorTable(Ptr) 

IniiCursorQ 

InitPort(Ptr) 

InsertItem(Ptr,int ,int) 

rnsertMenu(Hdl ,int) 

InsertRect( Ptr , i nt , i nt ) 

InsertRgn(Hdl,int,int) 

InstallFontf long, int) 

InvalRect(Ptr) 

InvalRgn(Hdl) 

InvertArc(Ptr,int,int) 

InvertOval(Ptr) 

InvertPoIy(Hdl) 

InvertRect(Ptr) 

InvertRgn(Hdl) 

InvertRRect(Ptr,int,int) 

IsDialogEvent(Ptr) 

KillControls(Ptr) 

KillPicture(Hdl) 

KillPolv(Hdl) 



Scrp IS 
Scrp 14 
Scrp 16 
Scrp 15 
Scrp 19 
Wind 68 
QD 159 
QD 12 
Wind 46 
Menu 17 
QD 179 
Wind 76 
QD 155 
QD 157 
QD 211 
Menu 26 
Menu 30 
Wind 48 
QD 71 
QD 201 
QD 181 
Wind 44 
Wind 43 
Wind 32 
Wind 41 
Wind 14 
QD 133 
Wind 27 
Mem 42 
Mem 41 
Ctl 
QD 
Dig 
QD 
Wind 
Ctl 
Menu 44 
Mem 32 
Mem 33 
Mem 34 
Mem 35 
QD 
QD 
QD 
Menu 15 
Menu 13 
QD 76 
QD 112 
Font 14 
Wind 58 
Wind 59 
QD 101 
91 
191 
86 
124 
96 
16 
11 
187 
195 



14 
144 
34 
39 
18 
17 



13 
202 
25 



QD 

QD 
QD 
QD 
QD 

Dig 
Ctl 
QD 
QD 



283 
283 
280 
281 

280 

87 
48 

140 
183 

1 86 

72 
72 

72 

72 

181 

181 

140 

72 

67 

67 

133 

140 

150 

136 

135 

74 

144 

41 

40 

209 

99 

261 

71 

135 

209 

174 

38 

38 

38 

38 

48 

99 

179 
173 

76 

82 
289 
147 
147 

92 

92 

93 

88 

92 

90 
260 
205 
94 

77 
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void 


LEActivate(Hdl) 


LE 


15 


229 


void 


LECHck(Ptr,Hdl) 


LE 


13 


229 


void 


LECopy(Hdl) 


LE 


19 


231 


void 


LECut(Hdl) 


LE 


18 


231 


void 


LEDeactivatefHdl) 


LF. 


16 


230 


void 


LEDelete(Hdl) 


LE 


21 


231 


void 


LEDispose(Hdl) 


LE 


10 


229 


void 


LEFromScrapQ 


LE 


25 


234 


void 


LECetScrapLenQ 


LE 


28 


234 


int 


LEIdle(Hdl) 


LE 


12 


230 


void 


LEInsert(Ptr,int,Hdl) 


LE 


22 


232 


void 


LEKey(int,int,Hdl) 


LE 


17 


230 


void 


LENew(Ptr,Ptr,int) 


LE 


9 


229 


IIJI 


LEPaste(Hdl) 


LE 


20 


231 


void 


LEScrapHandle( ) 


LE 


27 


234 


Hdl 


I , ESetScra pLen( in t ) 


LE 


29 


234 


void 


LESeiSelect(int,int,Hdl) 


LE 


14 


230 


v< > id 


LESeiTexl(Ptr,int,Hdl) 


LE 


11 


229 


void 


LEShutDownQ 


LE 


3 


320 


void 


LEStartUp(int,int) 


LE 


2 


229 


void 


LETexiBox(Ftr,int,Ptr,int) 


LE 


24 


233 


void 


LEToScrapf) 


LE 


26 


234 


void 


LEUpdate(Hdl) 


LE 


23 


232 


void 


LEVerskmQ 


LE 


4 


322 


inl 


Linefint.int) 


QD 


61 


87 


void 


LuieTo(int.int) 


QD 


60 


87 


void 


Load OneTool ( i n t , int ) 


TL 


15 


2S 


void 


Load Sera p() 


Scrp 


10 


280 


void 


LoadTools(Ptr) 


TL 


14 


29 


void 


LocalToGlobal(Ptr) 


QD 


132 


74 


void 


MapPoly(Hdl,Ptr,Ptr) 


QD 


197 


84 


void 


MapPt(Ptr,Ptr,Ptr) 


QD 


138 


84 


void 


MapRect(Ptr,Ptr,Ptr) 


QD 


139 


84 


void 


MapRgn<Hdl,Ptr,Ptr) 


QD 


140 


84 


void 


MaxBlockf) 


Mem 


28 


39 


long 


MenuKey(Ptr,Hdl) 


Menu 


9 


175 


void 


MenuSelect(Ptr,Hdl) 


Menu 


43 


174 


void 


MenuShu (Do wn ( ) 


Menu 


3 


320 


void 


Menu StartUp( i nt , in t ) 


Menu 


2 


173 


void 


MenuVersion() 


Menu 


4 


322 


int 


MMShutDown(im) 


Mem 


3 


321 


void 


MMStartUpQ 


Mem 


2 


36 


int 


MM Version () 


Mem 


4 


322 


int 


ModaJDialog(Ptr) 


Dig 


15 


254 


int 


Move{int,int) 


QD 


59 


68 


void 


MoveConirol(intant,Hdl) 


Ctl 


22 


210 


void 


MovePortTo(int,int) 


QD 


34 


65 


void 


MoveTo(int,int) 


QD 


58 


68 


void 


MoveWindow(int,int,Ptr) 


Wind 


25 


144 


void 


MTVersion() 


Misc. 


4 


322 


int 


NewControl ( Ptr, Ptr, Ptr, int, int.int, int, Ptr. long, Ptr) 


Ctl 


9 


204 


I Id] 


NewDItem(Ptr,int,Ptr,int,Ptr,int,int,Ptr) 


Dig 


13 


251 


void 


NewH«ndle(l ong ,in t , in t , Pt r) 


Mem 


9 


36 


Hdl 


NewMenu(Ptr) 


Menu 


45 


173 


Ikf] 


NewMenuBar(Ptr) 


Menu 


21 


183 


[Id! 


Ne wModal Dialog ( Ptr, int, long) 


Dig 


10 


250 


Ptr 


NewModelessDialog(Ptr,Ptr,Ptr,int,long,Ptr) 


Dig 


11 


259 


Hdl 


NewRgn() 


QD 


103 


79 


Ptr 


NewWindow(Ptr) 


Wind 


9 


134 


int 


NoteAlert(Ptr.Ptr) 


Dig 


25 


259 


void 


O bscu reC ursor( ) 


QD 


146 


99 
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void 


OffsetPoly ( Hdl ,int , i nl ) 


void 


OffsetRect(Ptr ,int ,int) 


void 


Offset Rfitn I Ml . int , in ! j 


int 


OpenNDA(int) 


Hdl 


OpenPicture(Ptr) 


Hdl 


OpenPolyQ 


void 


OpenPort(Ptr) 


void 


OpenRgnQ 


void 


PaintArc(Ptr,int,int) 


void 


PaintOval(Ptr) 


void 


PaintPixels(Ptr) 


void 


PaintPoly(Hdl) 


void 


PaintRect(Ptr) 


void 


PaintRgn(Hdl) 


void 


PaintRRect{Ptr,int.int) 


void 


ParamText(Ptr , Ptr .Ptr.Ptr) 


void 


PenNormalQ 


long 


PenRect(int,int,Ptr) 


int 


FostEvent(int,Iong) 


void 


PPToPort(Ptr,Ptr,int,im\int) 


void 


Pt2Rect(Ptr,Ptr) 


int 


PtlnRect(Ptr.Ptr) 


int 


PtInRgn(Ptr,HdI) 


void 


PtrToHand{Ptr,HdI .long) 


void 


PurgeAII(int} 


void 


PurgeHandle(Hdl) 


void 


PutScrap( I ong , i n t . Pt r ) 


void 


QDShutDown( ) 


void 


QDStartUpf int ,int,int,int) 


int 


QDVtrskmf! 


void 


ReadAsciiTime(Ptr) 


void 


ReallocHandle(long,int,int.Ptr,Hdl) 


int 


RectlnRgn(Ptr.Hdl) 


void 


RectRgn(HdUPtr) 


void 


Refresh(Ptr) 


void 


RemoveItem(Ptr,int) 


void 


ResetAlertStageQ 


void 
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80-92 


MenuSelect 


161 - 174 




PaintRRect 


90-160-190 


MenuShutDown 


320 




param£trage texte 




MenuStartUp 


173 - 320 




statique 


261 


MenuVersion 


322 




ParamList 


128 


mise a jour d'une fenetre 


123-147 




ParamText 


261 - 269 


MMShutDown 


321 




pascal (directive) 


26 


MMStartUp 


36 - 318 




Paste 


278 


MM Version 


322 




pattern 


56-70-299 


Modal Dialog 


254 - 269 ■ 


■312 


pattern de fond 


57-67 


mode de transfer! 


61 




pattern du crayon 


69 


mode du crayon 


68 




PenNormal 


67 


MouseDown 


101 - 103 ■ 

206 -2.11) 


140- 


PenState 
periodicity d'un 


70 


Mouse Up 


101 - 103 




accessoire 


278 


Move 


68 




Picltem 


243 


MoveControl 


210 




picture 


60-94 


MovePortTo 


65 




PinRect 


151 


MoveTo 


68 




pixel 


54-90-98 


Move Window 


144-196 




pixel (codification) 


45 


MTShutDown 


321 




pixel map 


54-97 


MTStartUp 


318 




plan de coordonnees 


52 


MTVersion 


322 




point 


52 - 73 - 90 


muet (item dans 






Point 


73 


dialogue) 


244 




Pointer 


36 


Munger 


275 




pointeur maitre 


32 


m Up Mask 


105 




polygene 


53 - 77 - 93 


NewControl 


203 




pomme (definition menu) 169 


NewDItem 


251 




PortRect 


57-65 


NewHandle 


36-64-317 


PostEvenl 


109 


NewMenu 


173 




PPToPort 


98 - 162 


NewMemuBar 


183-187 




presse-papiers 


279 


New Modal Dialog 


250 




procedure d' action 




NewModelessOialog 


259 




(controle) 


211 


NewRgn 


66-79-310 


Pt2Rect 


75-111 


NewWindow 


63 - 134 




PtlnRect 


83 - 161 - 187 - 


niveau d'une alerte 


249 






240 


Note Alert 


259 - 273 




PtlnRgn 


83- 111 - 161 - 


No Under Item 


178 






164-304 


Null Event 


103 




PtrToHand 

purgeable (bloc) 


39 
35 


ObscureCursor 


99 




PurgeAU 


37 


OffsetPoly 


78 




PurgeHamdle 


37 


OffsetRect 


76 - 165 - 


304 


PutScrap 


280 


OffsetRgn 


80 




QDShutDown 


321 


OpenNDA 


158-196 


-278- 


QDStartUp 


47 - 320 




292 




QDVersion 


322 


OpenPicture 


94 




quitter 


320 


OpenPol) 


77 








OpenPort 


62 




Radio Button 


207 


OpenRgn 


79 




Radio Item 


243 


OptionKey 


105 




RadioProc 


204 


page z£ro 


31 




ReadAsciiTime 


111-275 


PageDown 


122 - 201 


-207 


ReallocHandle 


37 


PageUp 


131-201 


■ 21.17 


Red 


19-74 


PalntArc 


92-160- 


190 


rectangle 


52-74-88 


PaintOval 


92-160- 


190 


rectangle arrondi 


88-90 


PaintPixels 


97 




RectlnRgn 


83 


PaintPoly 


77-93 




RectRgn 


80 
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Refresh 


133 


SetltemType 


260 


region 


53 - 78 - 92 


SetltemValue 


261 -269-312 


region visible 


57-67 


SetlText 


264-269-312 


relogeable (bloc) 


32 


SctMasterSCB 


48 


Removeltem 


256 - 269 


SetMaxGrow 


137 


Reset (suffixe) 


25 


Set Menu Bar 


183 - 187 


ResetAlertStage 


259 


Set Menu Flag 


176 - 198 


RestoreHandle 


37 


Si'tMtnuIl) 


176 


SealePt 


84 


SetMenuTitle 


176 


SCB (structure) 


45 


SetOrgnMask 


299-311-313 


ScrapS hut Down 


320 


SetOrigin 


298-303 


ScrapStartUp 


280-320 


SetPage 


139 


Scrap Version 


322 


SetPenMask 


70 


ScTollBarltem 


243 


SetPenMode 


68-111 


Scroti Proc 


204 


SetPenPal 


69-189-312 


ScrollRect 


97-297-310 


SetPenSize 


68-190-312 


SectRect 


77 


SetPenState 


70 


SectRgn 


82 


SetPorl 


63 


segment de programme 


43 


SetPortLoc 


64 


selection de texte 


227 


SetPortRect 


65 


Select Window 


127 - 141 - 292 


SetPortSize 


65 


SellText 


264-269-315 


SetPt 


73 


Send Behind 


151 


SetPurge 


38 


SetAIISCBs 


48-219 


SetPurgeAII 


38 


SetBackColor 


72 - 162 


SetRect 


75 


SetBackPat 


67 


SetRectRgn 


80 


SetBarColors 


181-186 


SetSCB 


48 


SetCDraw 


139 


SetScrapPath 


280 


SetCharExtra 


87 


SetScroJI 


137 


SetClip 


65 


SetSolidBackPat 


67 


SetClipHandle 


65 


SetSolidPenPat 


69-111-160- 


SetColorEntry 


50-217-222 




165 


SetColorTable 


50-219 


SetSpaceExtra 


87 


SetCOrigin 


136-298 


SetSysBar 


183 


SetCUAction 


210-219 


SelSysFont 


71 


SetCtlParams 


213 


SetSys Window 


140 


SetCtlRefCon 


210 


SetTextFace 


72 - 162 - 289 


SetCtlTitle 


209 


SetTextMode 


72-164-268 


SetCtlValue 


211-217 


SetTextSize 


72 - 289 


SetCursor 


99-117-165- 


SetTitleStart 


181 - 187 - 322 




240 - 304 


SetTitleWidth 


181 


SetDAFont 


250 


SetUserField 


72 


SetDataSize 


136 


SetVisHandle 


67 


SetDefButton 


264-314 


SetVisRgn 


67 


SetDerProc 


139 


SetWFrame 


135-313 


Set Empty Rgn 


80 


SetWRefCon 


136-188 


SetFont 


71 - 289 


SefWTitle 


135 - 1% - 315 


SetFontFlags 


71 


SFAilCaps 


287 


SetFontlD 


72 


SFGetFUe 


283 


SetForeColor 


72-162 


SFPGetFUe 


285 


Set Framed olor 


136-164 


SFPPutFiie 


286 


SetFullRect 


136 


SFPutFile 


286 


SetHandleSize 


39 


SFReply 


284 


SetlnfoDraw 


139 


SFShutDown 


320 


SetlnfoRefCon 


139-161 


SFStartUp 


283 - 320 


Setltem 


177-196 


SF'Version 


322 


SetltemBox 


260 


SkiftKey 


105 


SetltemFlag 


178 


Show Control 


209 - 220 


SetltemID 


178 - 196 


ShowCursor 


99 


SetltemMark 


176 


ShowDItem 


261 - 269 


SetltemStyle 


177 


Show Hide 


135 











INDEX I 341 


ShowPen 


71 




TrackGoAway 


145-161-292 


ShowWndow 


135-157- 


250 


Track Zoom 


145-161-292 


ShutDown (suffixe) 


26 




TRUE 


22 


silhouette (dessin de) 


IK) 




Underltem 


ITS 


SimpleButton 


2(17 




Undo 


278 


SimpleProc 


204 




Union Reel 


77 


SizeWindow 


144-161- 


314 


Union Rgn 


82 


Solid Pattern 


70 




UnioadQneTool 


27 - 322 


Start Drawing 


298 




Unload Scrap 


280 


Start 1 nfoDra w i ng 


149-161- 


.303 


Up Arrow 


207 


StartUp (suffixe) 


25 




Up date Evt 


103-123-147 


StatText 


243 




Up date Mask 


105 


Status (suffixe) 


25 




UserCtlltem 


243 


St ill Down 


110 




UserField 


57-72 


StopAlert 


259 - 269 




Userliem 


243 


St ring Bounds 


85 




ValidRect 


147 


StringWidth 


85 




ValidRgn 


147 


SubPt 


74 




verrouille (bloc) 


35 


S witch Evt 


103 




Version (suffixe) 


25 


SwitchMask 


104 




View Reel 


224 


System Click 


141- 161 ■ 


■194- 


WaitMouseUp 


110 




239 - 278 




wContDefProc 


131 


SystemEdit 


195-238- 


-278 


wFrame 


128-135 


SystemEvent 


278 




wlnContent 


141 


SystemTask 


193 - 278 


■295 


win Desk 


114 


taille du crayon 


68 




wtnDeskltem 


294 


Task Mask 


292 




win Drag 


141 


Task Master 


291 




WindShutDown 


320 


TaskRec 


103 




WiudStartUp 


133 - 320 


template (dialogue) 


248 




WindVersion 


322 


temporisation 


112 




wlnfoDefProc 


131 - 148 


TestControl 


209 




wlnfoRefCon 


131-139-149 


Text Bounds 


85 




win Frame 


141 


texte (caracteristiques) 


71 




wlnGoAway 


141 


texte (dessin) 


93 




wlnGrow 


141 


TextWidth 


85 




win Info 


141 


Thumb 


207 




wlnMenuBar 


141 - 174 


tick 


112 




wlnSpecial 


294 


TickCount 


111-156 




wlnZoom 


141 


I'l.MoiintN iilunii' 


28-317 




wRefCon 


128-136 


TI.ShutDown 


.121 




wZoom 


128-136 


TLStartUp 


28-318 




XORhdite 


128 


TLTextMountVolume 


28 




XorRgn 


H2 


TLVersion 


322 




ZeroScrap 


280 


TolalMem 


39 




Zoom Window 


145- 161 


Track Con trot 


207 - 217 




jerrno 


27 
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Voire avis nous interesse 

Pour nous permettre de faire de meilleurs livres, adressez-nous vos critiques sur 
present ouvrage. 

— Ce llvre vous donne-t-i) toute satisfaction ? 



Y a-t-ll un aspect du probleme que vous auriez aimi voir aborde ? 



Si vous souhaitez des eclaircisse merits techniques, ecrivez-nous, nous ne manquerons 

pas de vous repondre directement. 

Oil avez-vous achete ce livre ? 

O cadeau D librairie D autres 

D exposition D boutique micro 

Comment en avez-vous eu connaissance ? 

D publicity □ catalogue D autres 

□ exposition □ conseils d'un ami 

Avez-vous deja acquis des livres P.S.I. ? 

Lesquels? 

qu'en pensez-vous ? 



Nom 

Adresse 
Profession 
Centre d mteret 



Age 



CATALOGUE GRATUIT 



Vous pouvez obtenir un catalogue complet des ouvrages PSI, sur simple demande, ou en 
retournant cette page remplie a voire libraire, a votre boutique micro ou aux 



Editions PSI 

5, place du Colonel-Fabien 

75491 PARIS CEDEX 10 
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fcAppfe IIgs utilise la meme philosophie que celle 
developpee avec succes par son frere aine le Macintosh, le 
Desktop User Interface, qui met a la disposition de I'utilisateur 
une interface dune convivialite extraordinaire. 

Cette simplicity pour I'utilisateur final presente neanrnoins 
une contre partie : une plus grande complication pour le 
programmeur. Ce livre, destine exclusivement au programmeur 
sur Apple IIgs, decrit en detail toute la toolbox et les outils dont il 
dispose pour creer ses propres applications. 

Chaque chapitre presente un outil (ou manager) et les 
routines qui le composent: Memory Manager, Quickdraw, Event 
Manager, Window Manager, Menu Manager, Control 
Manager, Line Edit, Dialog Manager, Taskmaster, Toutes les 
routines sont illustrees par de petits exemples. L'auteur propose 
en fin de chaque chapitre, un exemple complet illustrant les 
diverses possibilites du manager. 

Les programmes de ce livre ont ete ecrits en langage C. 
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